--- a/VisualPart.st	Fri May 08 14:46:18 2009 +0200
+++ b/VisualPart.st	Fri May 08 16:17:09 2009 +0200
@@ -145,7 +145,13 @@
 "/Transcript show:'container '; show:container; show:' of '; show:self; 
 "/           show:' changed size to '; showCR:container viewRectangle.
 
-    self bounds:container viewRectangle.
+    self layout notNil ifTrue:[
+        frame := self layout 
+                    rectangleRelativeTo:container bounds
+                    preferred:self preferredBounds.
+
+        "/ container invalidate:frame.
+    ].
     self invalidate.
 
     "Created: 4.6.1996 / 21:27:58 / cg"
@@ -310,5 +316,5 @@
 !VisualPart class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/VisualPart.st,v 1.13 2009-05-08 11:48:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/VisualPart.st,v 1.14 2009-05-08 14:17:09 cg Exp $'
 ! !