MenuPanel.st
changeset 6005 8761a3198d7d
parent 6004 1aa4052dd0d3
child 6006 fb9398beb66a
--- a/MenuPanel.st	Fri Feb 15 09:51:02 2019 +0100
+++ b/MenuPanel.st	Fri Feb 15 10:07:20 2019 +0100
@@ -3917,7 +3917,7 @@
         "/    delayTime := delayTime / 2.
         "/ ]. 
         
-        (selection isNil or:[selection visibleSubmenu isNil]) ifTrue:[
+        (self topMenu activeMenu isNil or:[self topMenu activeMenu == self]) ifTrue:[
             "/ no menu open currently
             delayTime := 0.
         ].
@@ -3980,7 +3980,7 @@
     ].
 
     "Modified: / 15-03-2017 / 20:41:07 / stefan"
-    "Modified: / 15-02-2019 / 09:50:30 / Claus Gittinger"
+    "Modified: / 15-02-2019 / 10:05:57 / Claus Gittinger"
 !
 
 handleButtonPress:button atPoint:aPoint