--- a/ColorMenu.st Sat Jul 26 17:14:49 1997 +0200
+++ b/ColorMenu.st Mon Jul 28 12:19:09 1997 +0200
@@ -73,7 +73,7 @@
menu
"get the Menu
"
- |col submenu string menu|
+ |col submenu string|
Menu isNil ifTrue:[
Menu := self menuSpec decodeAsLiteralArray.
@@ -100,7 +100,7 @@
]
].
].
- ^ Menu
+ ^ Menu
"
Menu := nil
"
@@ -297,8 +297,6 @@
initialize
"setup menu
"
- |col submenu string holder|
-
super initialize.
self verticalLayout:false.
self fitFirstPanel:false.
@@ -339,5 +337,5 @@
!ColorMenu class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/ColorMenu.st,v 1.2 1997-06-17 10:39:25 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/ColorMenu.st,v 1.3 1997-07-28 10:18:31 cg Exp $'
! !