#TUNING by cg
authorClaus Gittinger <cg@exept.de>
Thu, 30 Jun 2016 18:28:53 +0200
changeset 5147 2bb6ca095860
parent 5146 1bc2c5c6fc91
child 5148 275375188608
#TUNING by cg class: MenuPanel changed: #mustRearrange shortcut if dependents are nil
MenuPanel.st
--- a/MenuPanel.st	Thu Jun 30 17:20:08 2016 +0200
+++ b/MenuPanel.st	Thu Jun 30 18:28:53 2016 +0200
@@ -2925,13 +2925,13 @@
     |oldPref|
 
     mustRearrange ifFalse:[
-	oldPref := preferredExtent.
-	preferredExtent := nil.
-	mustRearrange := true.
-	self invalidate. "/ RepairNow:true
-	(oldPref notNil and:[oldPref ~= self preferredExtent]) ifTrue:[
-	    self changed:#preferredExtent
-	].
+        oldPref := preferredExtent.
+        preferredExtent := nil.
+        mustRearrange := true.
+        self invalidate. "/ RepairNow:true
+        (oldPref notNil and:[oldPref ~= self preferredExtent]) ifTrue:[
+            dependents notNil ifTrue:[ self changed:#preferredExtent ]
+        ].
     ]
 
     "Modified: / 6.6.1998 / 19:51:07 / cg"