MenuPanel.st
changeset 4456 2afa333249ad
parent 4455 29a32d3d5a84
child 4462 b1a071102660
--- a/MenuPanel.st	Thu Nov 28 17:03:23 2013 +0100
+++ b/MenuPanel.st	Tue Dec 03 17:05:15 2013 +0100
@@ -2960,13 +2960,12 @@
 
     items isNil ifTrue:[^ self].
 
-    items do:[:item |
-	item canChangeVisibility ifTrue:[
-	    mustRearrange := true.
-	    self rearrangeItems.
-	    ^ self
-	].
+    (items contains:[:item | item canChangeVisibility]) ifTrue:[
+        mustRearrange := true.
+        self rearrangeItems.
     ]
+
+    "Modified: / 03-12-2013 / 17:04:05 / cg"
 !
 
 redrawX:x y:y width:w height:h
@@ -8722,11 +8721,11 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.574 2013-11-28 16:03:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.575 2013-12-03 16:05:15 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.574 2013-11-28 16:03:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.575 2013-12-03 16:05:15 cg Exp $'
 ! !