--- a/PopUpMenu.st Wed Jan 22 12:03:01 1997 +0100
+++ b/PopUpMenu.st Wed Jan 22 18:21:36 1997 +0100
@@ -1116,6 +1116,7 @@
buttonPress:button x:x y:y
hideOnRelease := true.
+
((x >= 0) and:[x < width]) ifTrue:[
((y >= 0) and:[y < height]) ifTrue:[
menuView buttonPress:button x:x y:y.
@@ -1123,7 +1124,7 @@
]
].
- "Modified: 8.3.1996 / 14:03:34 / cg"
+ "Modified: 22.1.1997 / 17:38:14 / cg"
!
buttonRelease:button x:x y:y
@@ -1300,5 +1301,5 @@
!PopUpMenu class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.59 1997-01-21 14:48:13 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.60 1997-01-22 17:21:36 cg Exp $'
! !