--- a/Layout.st Wed Feb 12 00:06:06 1997 +0100
+++ b/Layout.st Wed Feb 12 00:06:37 1997 +0100
@@ -92,14 +92,29 @@
!Layout methodsFor:'queries'!
+isAlignmentOrigin
+ "return true, if this is an alignmentOrigin"
+
+ ^ false
+
+!
+
isLayout
"return true, if the recevier is a layout object.
Always return true here."
+
^ true
"Modified: 27.4.1996 / 14:45:27 / cg"
!
+isLayoutOrigin
+ "return true, if this is a layoutOrigin"
+
+ ^ false
+
+!
+
rectangleRelativeTo:superRectangle preferred:prefRect
"compute the rectangle represented by the receiver,
given the superViews rectangle and the views preferredExtent.
@@ -113,5 +128,5 @@
!Layout class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/Layout.st,v 1.12 1996-05-29 13:12:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/Layout.st,v 1.13 1997-02-11 23:06:19 ca Exp $'
! !
--- a/LayoutOrg.st Wed Feb 12 00:06:06 1997 +0100
+++ b/LayoutOrg.st Wed Feb 12 00:06:37 1997 +0100
@@ -311,6 +311,13 @@
!LayoutOrigin methodsFor:'queries'!
+isLayoutOrigin
+ "return true, if this is a layoutOrigin"
+
+ ^ true
+
+!
+
origin
^ leftFraction asFloat @ topFraction asFloat
!
@@ -355,5 +362,5 @@
!LayoutOrigin class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutOrg.st,v 1.14 1996-05-26 16:50:39 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/Attic/LayoutOrg.st,v 1.15 1997-02-11 23:06:37 ca Exp $'
! !
--- a/LayoutOrigin.st Wed Feb 12 00:06:06 1997 +0100
+++ b/LayoutOrigin.st Wed Feb 12 00:06:37 1997 +0100
@@ -311,6 +311,13 @@
!LayoutOrigin methodsFor:'queries'!
+isLayoutOrigin
+ "return true, if this is a layoutOrigin"
+
+ ^ true
+
+!
+
origin
^ leftFraction asFloat @ topFraction asFloat
!
@@ -355,5 +362,5 @@
!LayoutOrigin class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.14 1996-05-26 16:50:39 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.15 1997-02-11 23:06:37 ca Exp $'
! !