--- a/MenuView.st	Wed Jun 26 00:22:50 2013 +0200
+++ b/MenuView.st	Wed Jun 26 00:25:56 2013 +0200
@@ -2454,17 +2454,12 @@
             ]
         ].
 
+        subMenuShown notNil ifTrue:[
+            self hideSubmenu.
+            subMenuShown := nil.
+        ].
         subMenu notNil ifTrue:[
-            subMenuShown notNil ifTrue:[
-                self hideSubmenu.
-            ].
-            subMenuShown := nil.
             self showSubmenu:newSelection.
-        ] ifFalse:[
-            subMenuShown notNil ifTrue:[
-                self hideSubmenu.
-            ].
-            subMenuShown := nil
         ].
     ] ifFalse:[
         "/ new, delayed code
@@ -2996,10 +2991,10 @@
 !MenuView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.178 2013-06-17 14:28:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.179 2013-06-25 22:25:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.178 2013-06-17 14:28:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.179 2013-06-25 22:25:56 cg Exp $'
 ! !