Context.st
changeset 21529 c67311afcc6c
parent 21415 4aaf30c174e9
child 21645 883f79e7b2a6
--- a/Context.st	Wed Feb 22 18:56:17 2017 +0100
+++ b/Context.st	Wed Feb 22 18:56:43 2017 +0100
@@ -1772,16 +1772,18 @@
     "return a string to display the receiver - for display in Inspector"
 
     "/ what a kludge - Dolphin and Squeak mean: printOn: a stream;
-    "/ ST/X (and some old ST80's) mean: draw-yourself on a GC.
+    "/ old ST80 means: draw-yourself on a GC.
     (aGCOrStream isStream) ifFalse:[
-	^ super displayOn:aGCOrStream
+        ^ super displayOn:aGCOrStream
     ].
 
     aGCOrStream
-	nextPutAll:self class name;
-	nextPut:$(.
+        nextPutAll:self class name;
+        nextPut:$(.
     self printOn:aGCOrStream.
     aGCOrStream nextPut:$).
+
+    "Modified (comment): / 22-02-2017 / 16:47:42 / cg"
 !
 
 fullPrintAllOn:aStream