--- a/FilteringLineStream.st	Mon Aug 26 23:12:37 2019 +0200
+++ b/FilteringLineStream.st	Mon Aug 26 23:12:40 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1996 by Claus Gittinger
 	      All Rights Reserved
@@ -11,6 +13,8 @@
 "
 "{ Package: 'stx:libbasic2' }"
 
+"{ NameSpace: Smalltalk }"
+
 FilteringStream subclass:#FilteringLineStream
 	instanceVariableNames:'lineBuffer lineFilter'
 	classVariableNames:''
@@ -197,11 +201,12 @@
     "collect a line and push it when a cr arrives"
 
     something == Character cr ifTrue:[
-	self cr
+        self cr
     ] ifFalse:[
-	lineBuffer isNil ifTrue:[lineBuffer := ''].
-	lineBuffer := lineBuffer copyWith:something.
-    ]
+        lineBuffer isNil ifTrue:[lineBuffer := ''].
+        lineBuffer := lineBuffer copyWith:something.
+    ].
+    ^ something
 
     "Created: 2.7.1996 / 20:54:38 / cg"
     "Modified: 2.7.1996 / 21:03:26 / cg"
@@ -252,10 +257,10 @@
 !FilteringLineStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/FilteringLineStream.st,v 1.9 2014-11-08 10:20:41 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/FilteringLineStream.st,v 1.9 2014-11-08 10:20:41 cg Exp $'
+    ^ '$Header$'
 ! !