--- a/UILayoutTool.st Wed Aug 21 18:29:35 2002 +0200
+++ b/UILayoutTool.st Thu Aug 22 13:08:41 2002 +0200
@@ -1366,13 +1366,15 @@
layout := Smalltalk::AlignmentOrigin new.
- layout leftOffset:((self aspectFor:#leftOffset) value) ? 0.
- layout topOffset:((self aspectFor:#topOffset) value) ? 0.
- layout leftFraction:((self aspectFor:#leftFraction) value) ? 0.
- layout topFraction:((self aspectFor:#topFraction) value) ? 0.
-
- layout leftAlignmentFraction:((self aspectFor:#leftAlignmentFraction) value) ? 0.
- layout topAlignmentFraction:((self aspectFor:#topAlignmentFraction) value) ? 0.
+ layout
+ leftFraction:(((self aspectFor:#leftFraction) value) ? 0)
+ offset:(((self aspectFor:#leftOffset) value) ? 0)
+ topFraction:(((self aspectFor:#topFraction) value) ? 0)
+ offset:(((self aspectFor:#topOffset) value) ? 0).
+
+ layout
+ leftAlignmentFraction:(((self aspectFor:#leftAlignmentFraction) value) ? 0)
+ topAlignmentFraction:(((self aspectFor:#topAlignmentFraction) value) ? 0).
^ layout
! !
@@ -2353,17 +2355,17 @@
layout := Smalltalk::LayoutFrame new.
- layout leftOffset:((self aspectFor:#leftOffset) value) ? 0.
- layout rightOffset:((self aspectFor:#rightOffset) value) ? 0.
- layout topOffset:((self aspectFor:#topOffset) value) ? 0.
- layout bottomOffset:((self aspectFor:#bottomOffset) value) ? 0.
- layout leftFraction:((self aspectFor:#leftFraction) value) ? 0.
- layout rightFraction:((self aspectFor:#rightFraction) value) ? 0.
- layout topFraction:((self aspectFor:#topFraction) value) ? 0.
- layout bottomFraction:((self aspectFor:#bottomFraction) value) ? 0.
+ layout
+ leftFraction:(((self aspectFor:#leftFraction) value) ? 0)
+ offset:(((self aspectFor:#leftOffset) value) ? 0)
+ rightFraction:(((self aspectFor:#rightFraction) value) ? 0)
+ offset:(((self aspectFor:#rightOffset) value) ? 0)
+ topFraction:(((self aspectFor:#topFraction) value) ? 0)
+ offset:(((self aspectFor:#topOffset) value) ? 0)
+ bottomFraction:(((self aspectFor:#bottomFraction) value) ? 0)
+ offset:(((self aspectFor:#bottomOffset) value) ? 0).
^ layout
-
! !
!UILayoutTool::LayoutFrame methodsFor:'common frames'!
@@ -2561,13 +2563,13 @@
layout := Smalltalk::LayoutOrigin new.
- layout leftOffset:((self aspectFor:#leftOffset) value) ? 0.
- layout topOffset:((self aspectFor:#topOffset) value) ? 0.
- layout leftFraction:((self aspectFor:#leftFraction) value) ? 0.
- layout topFraction:((self aspectFor:#topFraction) value) ? 0.
+ layout
+ leftFraction:(((self aspectFor:#leftFraction) value) ? 0)
+ offset:(((self aspectFor:#leftOffset) value) ? 0)
+ topFraction:(((self aspectFor:#topFraction) value) ? 0)
+ offset:(((self aspectFor:#topOffset) value) ? 0).
^ layout
-
! !
!UILayoutTool::Point class methodsFor:'interface specs'!