--- a/PopUpMenu.st Sat Dec 04 16:06:17 1999 +0100
+++ b/PopUpMenu.st Tue Dec 07 14:03:50 1999 +0100
@@ -851,6 +851,7 @@
|actionIndex value sel retVal selIdx
args selectors checkFlags check|
+ menuView action:nil. "/ must clear it ...
retVal := 0.
actionValues notNil ifTrue:[
retVal := nil
@@ -1523,5 +1524,5 @@
!PopUpMenu class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.81 1999-11-13 12:27:47 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.82 1999-12-07 13:03:50 cg Exp $'
! !