--- a/TranslatingWrapper.st	Fri May 08 13:54:52 2009 +0200
+++ b/TranslatingWrapper.st	Fri May 08 13:55:06 2009 +0200
@@ -9,8 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
-
 "{ Package: 'stx:libview2' }"
 
 Wrapper subclass:#TranslatingWrapper
@@ -188,7 +186,7 @@
 
     delta := originPoint - origin.
     origin := originPoint.
-    bounds := bounds origin + origin extent:bounds extent.
+    frame := frame origin + origin extent:frame extent.
     component bounds:(component bounds + delta).
 
     "Created: 26.5.1996 / 16:07:47 / cg"
@@ -198,7 +196,7 @@
 !TranslatingWrapper methodsFor:'accessing - bounds'!
 
 bounds:newBounds
-    bounds := newBounds.
+    frame := newBounds.
     origin = 0 ifTrue:[
         component bounds:newBounds
     ] ifFalse:[
@@ -256,5 +254,5 @@
 !TranslatingWrapper class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TranslatingWrapper.st,v 1.7 2003-08-18 12:13:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TranslatingWrapper.st,v 1.8 2009-05-08 11:55:06 cg Exp $'
 ! !