#OTHER by cg
authorClaus Gittinger <cg@exept.de>
Wed, 22 Feb 2017 18:58:25 +0100
changeset 21534 137e220de78c
parent 21533 1238b69adbeb
child 21535 f1ca40b3f545
#OTHER by cg comment in: #displayOn:
Geometric.st
--- a/Geometric.st	Wed Feb 22 18:57:26 2017 +0100
+++ b/Geometric.st	Wed Feb 22 18:58:25 2017 +0100
@@ -421,7 +421,7 @@
      attributes are used. The default here is to display the outline."
 
     "/ what a kludge - Dolphin and Squeak mean: printOn:;
-    "/ ST/X (and some old ST80's) mean: draw-yourself on.
+    "/ old ST80 means: draw-yourself on a GC.
     (aGCOrStream isStream) ifTrue:[
         ^ super displayOn:aGCOrStream
     ].
@@ -436,6 +436,8 @@
      r := Rectangle origin:10@10 corner:100@100.
      r displayOn:v.
     "
+
+    "Modified (comment): / 22-02-2017 / 16:48:07 / cg"
 !
 
 displayStrokedOn:aGC