--- a/Unicode16String.st	Wed Feb 22 19:02:09 2017 +0100
+++ b/Unicode16String.st	Wed Feb 22 19:02:13 2017 +0100
@@ -61,6 +61,8 @@
     "Modified: 30.6.1997 / 15:39:21 / cg"
 ! !
 
+
+
 !Unicode16String class methodsFor:'reading'!
 
 readFrom:aStreamOrString onError:exceptionBlock
@@ -105,15 +107,17 @@
      You must use an ISO10646 unicode font to display this string"
 
     "/ what a kludge - Dolphin and Squeak mean: printOn: a stream;
-    "/ ST/X (and some old ST80's) mean: draw-yourself on a GC.
-    aGCOrStream isStream ifTrue:[
-        aGCOrStream
-            nextPut:$';
-            nextPutAllUnicode:self;
-            nextPut:$'.
-        ^ self
+    "/ old ST80 means: draw-yourself on a GC.
+    aGCOrStream isStream ifFalse:[
+        ^ super displayOn:aGCOrStream
     ].
-    ^ super displayOn:aGCOrStream
+    
+    aGCOrStream
+        nextPut:$';
+        nextPutAllUnicode:self;
+        nextPut:$'.
+
+    "Modified: / 22-02-2017 / 16:56:32 / cg"
 !
 
 printOn:aStream
@@ -217,6 +221,7 @@
     ^ true
 ! !
 
+
 !Unicode16String class methodsFor:'documentation'!
 
 version