PopUpMenu.st
changeset 342 ddbe4e8d6e9f
parent 335 81c8965c4437
child 348 2925bbd4f346
--- a/PopUpMenu.st	Fri Feb 09 18:57:17 1996 +0100
+++ b/PopUpMenu.st	Fri Feb 09 19:59:17 1996 +0100
@@ -857,6 +857,15 @@
     menuView keyPress:key x:x y:y.
 !
 
+mapped
+    super mapped.
+    device buttonStates == 0 ifTrue:[
+        hideOnRelease := false
+    ].
+
+    "Created: 9.2.1996 / 19:56:20 / cg"
+!
+
 pointerEnter:state x:x y:y
     "catch quick release of button"
 
@@ -952,5 +961,5 @@
 !PopUpMenu class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.32 1996-02-09 01:27:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.33 1996-02-09 18:59:17 cg Exp $'
 ! !