Image.st
changeset 757 6c7dc7e05e93
parent 748 818c6312acd1
child 758 51ac65155b96
--- a/Image.st	Wed May 29 00:14:12 1996 +0200
+++ b/Image.st	Wed May 29 10:22:55 1996 +0200
@@ -781,6 +781,14 @@
     "Modified: 23.4.1996 / 10:57:32 / cg"
 !
 
+container:aVisualContainer
+    "ignored here - added to allow images to be used like
+     VisualComponents (later, Image should inherit from it)"
+
+    "Created: 28.5.1996 / 23:43:49 / cg"
+    "Modified: 29.5.1996 / 10:22:23 / cg"
+!
+
 depth
     "return the depth of the image"
 
@@ -2372,6 +2380,16 @@
 
 !Image methodsFor:'displaying'!
 
+displayOn:aGC
+    "draw the receiver in the graphicsContext, aGC.
+     Smalltalk-80 compatibility"
+
+    self displayOn:aGC x:0 y:0.
+
+    "Modified: 12.5.1996 / 20:16:38 / cg"
+    "Created: 28.5.1996 / 23:44:29 / cg"
+!
+
 displayOn:aGC at:aPoint
     "draw the receiver in the graphicsContext, aGC.
      Smalltalk-80 compatibility"
@@ -3715,6 +3733,6 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.76 1996-05-28 19:12:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.77 1996-05-29 08:22:55 cg Exp $'
 ! !
 Image initialize!