LayoutOrigin.st
changeset 415 5d1bf4dffbf5
parent 275 d500c08871ab
child 543 1e730ed96b0b
--- 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 $'
 ! !