--- a/FilteringLineStream.st	Mon Aug 26 23:19:41 2019 +0200
+++ b/FilteringLineStream.st	Mon Aug 26 23:51:04 2019 +0200
@@ -198,7 +198,8 @@
 !
 
 nextPut:something
-    "collect a line and push it when a cr arrives"
+    "collect a character or line and push it when a cr arrives.
+     Answer the argument."
 
     something == Character cr ifTrue:[
         self cr