--- a/AlignmentOrigin.st	Thu Aug 13 17:10:16 1998 +0200
+++ b/AlignmentOrigin.st	Thu Aug 13 18:41:10 1998 +0200
@@ -272,15 +272,14 @@
 
     prefRect := prefRectHolder value.
 
-    leftOffset isNil ifTrue:[
-        x := 0
-    ] ifFalse:[
-        x := leftOffset value
+    x := superRectangle left.
+    y := superRectangle top.
+
+    leftOffset notNil ifTrue:[
+        x := x + leftOffset value
     ].
-    topOffset isNil ifTrue:[
-        y := 0
-    ] ifFalse:[
-        y := topOffset value
+    topOffset notNil ifTrue:[
+        y := y + topOffset value
     ].
     leftFraction notNil ifTrue:[
         x := x + (superRectangle width * leftFraction value)
@@ -308,11 +307,11 @@
      aO rectangleRelativeTo:superRect preferred:(0@0 corner:30@30) 
     "
 
-    "Modified: / 27.5.1998 / 10:19:09 / cg"
+    "Modified: / 13.8.1998 / 18:39:26 / cg"
 ! !
 
 !AlignmentOrigin class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/AlignmentOrigin.st,v 1.24 1998-05-27 09:20:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/AlignmentOrigin.st,v 1.25 1998-08-13 16:40:40 cg Exp $'
 ! !