PanelView.st
changeset 4945 b3a7feb93dd8
parent 4415 af8d6ee4e3e2
child 5516 6ac4f56c49f3
--- a/PanelView.st	Sun Mar 16 22:06:06 2014 +0100
+++ b/PanelView.st	Sun Mar 16 22:25:09 2014 +0100
@@ -395,7 +395,12 @@
     "my size has changed - must rearrange elements"
 
     super sizeChanged:how.
-    self layoutChanged
+    "/ self layoutChanged - no; leads to recursion
+    realized ifTrue:[
+        self setChildPositions
+    ] ifFalse:[
+        mustRearrange := true
+    ].
 !
 
 update:something with:aParameter from:changedObject
@@ -614,11 +619,12 @@
      that a repositioning is needed to do so when the view eventually becomes
      visible."
 
+    super layoutChanged.
     realized ifTrue:[
         self setChildPositions
     ] ifFalse:[
         mustRearrange := true
-    ]
+    ].
 !
 
 makeMyselfDependentOnSubviews
@@ -662,5 +668,6 @@
 !PanelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.46 2012-04-10 21:36:38 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.47 2014-03-16 21:25:09 cg Exp $'
 ! !
+