--- a/LayoutOrigin.st Wed May 27 11:20:52 1998 +0200
+++ b/LayoutOrigin.st Wed May 27 11:21:38 1998 +0200
@@ -10,8 +10,6 @@
hereby transferred.
"
-'From Smalltalk/X, Version:3.1.10 on 20-sep-1997 at 11:59:21 pm' !
-
Layout subclass:#LayoutOrigin
instanceVariableNames:'leftFraction topFraction leftOffset topOffset'
classVariableNames:''
@@ -349,11 +347,13 @@
^ leftFraction asFloat @ topFraction asFloat
!
-rectangleRelativeTo:superRectangle preferred:prefRect
+rectangleRelativeTo:superRectangle preferred:prefRectHolder
"compute the rectangle represented by the receiver,
given the superViews rectangle and the views preferredExtent."
- |x y|
+ |x y prefRect|
+
+ prefRect := prefRectHolder value.
leftOffset isNil ifTrue:[
x := 0
@@ -383,11 +383,11 @@
lO rectangleRelativeTo:superRect preferred:(0@0 corner:30@30)
"
- "Modified: 13.9.1997 / 10:40:35 / cg"
+ "Modified: / 27.5.1998 / 10:19:58 / cg"
! !
!LayoutOrigin class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.18 1997-09-20 22:19:45 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.19 1998-05-27 09:21:38 cg Exp $'
! !