--- a/CharacterWriteStream.st	Mon Apr 01 09:14:46 2019 +0200
+++ b/CharacterWriteStream.st	Mon Apr 01 17:17:06 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2005 by eXept Software AG
               All Rights Reserved
@@ -278,6 +276,9 @@
 !
 
 nextPutAll:aCollection startingAt:start to:stop
+    "append the elements from first index to last index
+     of the argument, aCollection onto the receiver (i.e. both outstreams)"
+
     |needCharacterSize|
 
     aCollection isCharacters ifFalse:[
@@ -293,6 +294,7 @@
     super nextPutAll:aCollection startingAt:start to:stop
 
     "Modified: / 22-11-2018 / 12:53:10 / Stefan Vogel"
+    "Modified (comment): / 01-04-2019 / 17:13:06 / Claus Gittinger"
 !
 
 nextPutAllUnicode:aCollection