checkin from browser
authorClaus Gittinger <cg@exept.de>
Mon, 22 Apr 1996 19:42:11 +0200
changeset 584 6106ad13708d
parent 583 211abfdb4db5
child 585 426d2018cdc8
checkin from browser
SimpleView.st
--- 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!