--- a/SimpleView.st Mon Apr 22 19:38:28 1996 +0200
+++ b/SimpleView.st Mon Apr 22 19:42:11 1996 +0200
@@ -3428,10 +3428,6 @@
]
].
actionSelector numArgs ~~ 0 ifTrue:[
- haveArg ifFalse:[
- "/ for checkToggle entries, pass its value
- actionArg := menu checkToggleAt:actionSelector
- ].
menuPerformer perform:actionSelector with:actionArg
] ifFalse:[
menuPerformer perform:actionSelector
@@ -3447,7 +3443,7 @@
super activateMenu
"Created: 1.3.1996 / 13:24:18 / cg"
- "Modified: 7.3.1996 / 19:53:59 / cg"
+ "Modified: 22.4.1996 / 19:41:41 / cg"
!
buttonPress:button x:x y:y
@@ -6185,6 +6181,6 @@
!SimpleView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.77 1996-04-20 09:41:00 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.78 1996-04-22 17:42:11 cg Exp $'
! !
SimpleView initialize!