--- a/CharacterWriteStream.st	Mon Aug 26 10:35:45 2019 +0200
+++ b/CharacterWriteStream.st	Mon Aug 26 10:36:11 2019 +0200
@@ -263,6 +263,7 @@
 
 nextPutAll:aCollection
     "append aCollection to the receiver.
+     Answer the receiver.
      Redefined to convert to a string of the needed character size."
 
     |needCharacterSize|