--- a/Object.st	Wed May 29 15:19:03 1996 +0200
+++ b/Object.st	Wed May 29 16:31:04 1996 +0200
@@ -3565,6 +3565,17 @@
     "Modified: 13.5.1996 / 12:16:14 / cg"
 !
 
+displayOn:aGc
+    "ST-80 Compatibility
+     display the receiver in a graphicsContext at 0@0
+     - this method allows for any object to be displayed in some view
+     (although the fallBack is to display its printString ...)"
+
+    ^ self displayOn:aGc x:0 y:0.
+
+    "Created: 29.5.1996 / 16:28:58 / cg"
+!
+
 displayOn:aGc at:aPoint
     "ST-80 Compatibility
      display the receiver in a graphicsContext - this method allows
@@ -3575,9 +3586,12 @@
 
 displayOn:aGc x:x y:y
     "display the receiver in a graphicsContext - this method allows
-     for any object to be displayed in a ListView - for example."
+     for any object to be displayed in a ListView - for example.
+     The fallBack here shows the receivers printString."
 
     ^ aGc displayString:(self displayString) x:x y:y.
+
+    "Modified: 29.5.1996 / 16:29:38 / cg"
 !
 
 displayString
@@ -5143,6 +5157,6 @@
 !Object class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.123 1996-05-20 08:38:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.124 1996-05-29 14:31:04 cg Exp $'
 ! !
 Object initialize!