--- a/GraphColumnViewSpec.st Thu Jan 10 14:00:52 2008 +0100
+++ b/GraphColumnViewSpec.st Thu Jan 10 14:00:55 2008 +0100
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libwidg2' }"
MenuComponentSpec subclass:#GraphColumnViewSpec
@@ -464,32 +463,38 @@
graphOriginX
"return the value of the instance variable 'graphOriginX' (automatically generated)"
- ^ graphOriginX!
+ ^ graphOriginX
+!
graphOriginX:something
"set the value of the instance variable 'graphOriginX' (automatically generated)"
- graphOriginX := something.!
+ graphOriginX := something.
+!
listHolder
"return the value of the instance variable 'listHolder' (automatically generated)"
- ^ listHolder!
+ ^ listHolder
+!
listHolder:something
"set the value of the instance variable 'listHolder' (automatically generated)"
- listHolder := something.!
+ listHolder := something.
+!
referenceSelector
"return the value of the instance variable 'referenceSelector' (automatically generated)"
- ^ referenceSelector!
+ ^ referenceSelector
+!
referenceSelector:something
"set the value of the instance variable 'referenceSelector' (automatically generated)"
- referenceSelector := something.!
+ referenceSelector := something.
+!
references
"return the value of the instance variable 'references' (automatically generated)"
@@ -524,7 +529,8 @@
showDefaultMenu:something
"set the value of the instance variable 'showDefaultMenu' (automatically generated)"
- showDefaultMenu := something.!
+ showDefaultMenu := something.
+!
showGrid
"return the value of the instance variable 'showGrid' (automatically generated)"
@@ -535,33 +541,38 @@
showGrid:something
"set the value of the instance variable 'showGrid' (automatically generated)"
- showGrid := something.!
+ showGrid := something.
+!
windowSize
"return the value of the instance variable 'windowSize' (automatically generated)"
- ^ windowSize!
+ ^ windowSize
+!
windowSize:something
"set the value of the instance variable 'windowSize' (automatically generated)"
- windowSize := something.!
+ windowSize := something.
+!
zoomY
"return the value of the instance variable 'zoomY' (automatically generated)"
- ^ zoomY!
+ ^ zoomY
+!
zoomY:something
"set the value of the instance variable 'zoomY' (automatically generated)"
- zoomY := something.! !
+ zoomY := something.
+! !
!GraphColumnViewSpec methodsFor:'building'!
aspectSelectors
- "add more aspect selectors
- "
+ "add more aspect selectors (these generate aspect methods in the definer)"
+
|more|
more := super aspectSelectors.
@@ -571,7 +582,7 @@
references notNil ifTrue:[more add:references].
zoomY notNil ifTrue:[more add:zoomY].
- ^ more
+ ^ more
!
createViewFor:aBuilder in:aView
@@ -676,6 +687,7 @@
!GraphColumnViewSpec class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnViewSpec.st,v 1.12 2006-11-13 16:11:30 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnViewSpec.st,v 1.13 2008-01-10 13:00:55 cg Exp $'
! !
+
GraphColumnViewSpec initialize!