--- a/VisualComponent.st	Sun May 10 13:01:57 2009 +0200
+++ b/VisualComponent.st	Sun May 10 14:31:53 2009 +0200
@@ -252,7 +252,7 @@
 extent:anExtent
     "set my extent"
 
-    frame := frame copy extent:anExtent
+    frame := self frame copy extent:anExtent
 !
 
 left
@@ -265,12 +265,9 @@
 !
 
 origin:newOrigin
-    "move my bounds"
+    "move my origin"
 
-    frame isNil ifTrue:[
-        self containerChangedSize
-    ].
-    frame := newOrigin copy extent:(frame extent).
+    frame := newOrigin copy extent:(self frame extent).
 
     "Created: 8.5.1996 / 23:36:07 / cg"
     "Modified: 9.5.1996 / 00:13:12 / cg"
@@ -566,5 +563,5 @@
 !VisualComponent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/VisualComponent.st,v 1.25 2009-05-08 15:35:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/VisualComponent.st,v 1.26 2009-05-10 12:31:53 cg Exp $'
 ! !