--- a/TextCollector.st	Thu Feb 23 16:45:28 2017 +0100
+++ b/TextCollector.st	Mon Feb 27 16:43:26 2017 +0100
@@ -1071,7 +1071,7 @@
 
 "/ self ~~ Transcript ifTrue:[ ^ self tshow:anObject].
     printString := anObject printString.
-    printString size == 0 ifTrue:[
+    printString isEmptyOrNil ifTrue:[
         self cr.
         ^ self.
     ].
@@ -1119,6 +1119,7 @@
     self addLine:printString
 
     "Modified: / 24-03-2012 / 20:00:08 / cg"
+    "Modified: / 27-02-2017 / 15:22:47 / stefan"
 !
 
 space