--- a/Image.st	Tue Sep 10 14:13:25 2002 +0200
+++ b/Image.st	Wed Sep 11 14:53:23 2002 +0200
@@ -5893,6 +5893,17 @@
     "Created: 12.5.1996 / 20:14:31 / cg"
 !
 
+displayOn:aGC x:x y:y opaque:opaque
+    "draw the receiver in the graphicsContext, aGC.
+     Smalltalk-80 compatibility"
+
+    opaque ifTrue:[
+        self displayOpaqueOn:aGC x:x y:y .
+    ] ifFalse:[
+        self displayOn:aGC x:x y:y .
+    ].
+!
+
 displayOpaqueOn:aGC at:aPoint
     "draw the receiver in the graphicsContext, aGC.
      Smalltalk-80 compatibility"
@@ -12474,6 +12485,6 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.321 2002-08-19 16:24:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.322 2002-09-11 12:53:23 penk Exp $'
 ! !
 Image initialize!