--- a/VisualPart.st	Sat Jul 20 13:08:10 1996 +0200
+++ b/VisualPart.st	Mon Jul 22 11:02:58 1996 +0200
@@ -5,7 +5,7 @@
 	category:'Graphics-Display Objects'
 !
 
-!VisualPart class methodsFor:'documentation'!
+!VisualPart  class methodsFor:'documentation'!
 
 documentation
 "
@@ -96,9 +96,13 @@
      The default here is to ignore this, but some wrappers like
      to resize when this happens."
 
-    ^ self
+"/Transcript show:'container '; show:container; show:' of '; show:self; 
+"/           show:' changed size to '; showCR:container viewRectangle.
+
+    self bounds:container viewRectangle
 
     "Created: 4.6.1996 / 21:27:58 / cg"
+    "Modified: 19.7.1996 / 21:20:58 / cg"
 ! !
 
 !VisualPart ignoredMethodsFor:'view protocol mimicri'!
@@ -135,8 +139,8 @@
     "Created: 5.6.1996 / 00:49:19 / cg"
 ! !
 
-!VisualPart class methodsFor:'documentation'!
+!VisualPart  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/VisualPart.st,v 1.5 1996-06-05 18:27:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/VisualPart.st,v 1.6 1996-07-22 09:02:16 cg Exp $'
 ! !