changed #left
authorClaus Gittinger <cg@exept.de>
Thu, 26 Oct 2006 19:34:45 +0200
changeset 2267 e5d7628a03fc
parent 2266 2f9a3d9320a7
child 2268 a947e7f7a28f
changed #left
DisplayObject.st
--- a/DisplayObject.st	Wed Oct 25 17:29:43 2006 +0200
+++ b/DisplayObject.st	Thu Oct 26 19:34:45 2006 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libview2' }"
 
 Object subclass:#DisplayObject
@@ -177,6 +176,12 @@
     "Created: 12.5.1996 / 20:20:54 / cg"
 !
 
+left
+    ^ self frame left
+
+    "Created: / 26-10-2006 / 18:08:42 / cg"
+!
+
 origin
     "return the frame origin"
 
@@ -547,5 +552,5 @@
 !DisplayObject class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/DisplayObject.st,v 1.34 2006-03-31 17:53:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DisplayObject.st,v 1.35 2006-10-26 17:34:45 cg Exp $'
 ! !