--- a/TreeItem.st	Wed Feb 22 16:39:18 2017 +0100
+++ b/TreeItem.st	Wed Feb 22 19:06:15 2017 +0100
@@ -775,7 +775,7 @@
      (although the fallBack is to display its printString ...)"
 
     "/ 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.
     ].
@@ -785,6 +785,8 @@
         nextPut:$(.
     self printOn:aGCOrStream. 
     aGCOrStream nextPut:$)
+
+    "Modified (comment): / 22-02-2017 / 16:48:13 / cg"
 !
 
 printOn:aStream