--- a/MenuPanel.st	Fri Jul 21 11:02:41 2000 +0200
+++ b/MenuPanel.st	Mon Jul 24 07:38:46 2000 +0200
@@ -5906,7 +5906,7 @@
                 self invalidate
             ].
 
-            (menuPanel superMenu isNil or:[menuPanel openMenuOnSelect]) ifTrue:[
+            (menuPanel isPopUpView not or:[menuPanel openMenuOnSelect]) ifTrue:[
                 (subMenu := self setupSubmenu) notNil ifTrue:[
                     self openSubmenu
                 ]
@@ -5918,6 +5918,6 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.226 2000-07-21 09:02:41 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.227 2000-07-24 05:38:46 ca Exp $'
 ! !
 MenuPanel initialize!