#displayImage for compatibility
authorStefan Vogel <sv@exept.de>
Tue, 11 May 2004 18:38:32 +0200
changeset 4171 bf0193e5a898
parent 4170 c78076310ce8
child 4172 0d5bc2a70b83
#displayImage for compatibility
GraphicsContext.st
--- a/GraphicsContext.st	Tue May 11 14:43:45 2004 +0200
+++ b/GraphicsContext.st	Tue May 11 18:38:32 2004 +0200
@@ -1474,6 +1474,14 @@
     ].
 !
 
+displayImage:aFormOrImage
+    "draw an image (or form).
+     Provided for ST-80 compatibilty;
+     in ST/X, images are also handled by #displayForm:"
+
+    self displayForm:aFormOrImage x:0 y:0
+!
+
 displayImage:aFormOrImage at:aPoint
     "draw an image (or form).
      Provided for ST-80 compatibilty;
@@ -2282,7 +2290,7 @@
 !GraphicsContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.103 2004-03-30 18:50:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/GraphicsContext.st,v 1.104 2004-05-11 16:38:32 stefan Exp $'
 ! !
 
 GraphicsContext initialize!