MenuPanel.st
changeset 1022 4519009d5f9c
parent 1018 67c883ab05d6
child 1024 28c87a2369f6
--- a/MenuPanel.st	Tue Jul 28 12:08:10 1998 +0200
+++ b/MenuPanel.st	Tue Jul 28 16:04:31 1998 +0200
@@ -2007,6 +2007,7 @@
     ) ifTrue:[
         ^ self
     ].
+    sensor anyButtonPressed ifFalse:[^ self].
 
 "/    lastButtonSelected notNil ifTrue:[
 "/        ^ self
@@ -2028,6 +2029,8 @@
     ].
     point := self translatePoint:(x@y) to:menu.
     menu selection:(menu itemAtX:(point x) y:(point y))
+
+    "Modified: / 28.7.1998 / 16:03:32 / cg"
 !
 
 buttonPress:button x:x y:y
@@ -4626,6 +4629,6 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.93 1998-07-27 16:07:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.94 1998-07-28 14:04:31 cg Exp $'
 ! !
 MenuPanel initialize!