FilteringStream.st
changeset 5160 ba06e617dd3f
parent 4199 a3839426cbcf
child 5179 5db8ac2ad6bd
--- a/FilteringStream.st	Mon Aug 26 23:12:26 2019 +0200
+++ b/FilteringStream.st	Mon Aug 26 23:12:37 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1996 by Claus Gittinger
 	      All Rights Reserved
@@ -333,13 +335,15 @@
 
     "/ filter it
     filter isNil ifTrue:[
-	outputStream nextPut:something
+        outputStream nextPut:something
     ] ifFalse:[
-	output := filter value:something.
-	output notNil ifTrue:[
-	    outputStream nextPut:output
-	]
-    ]
+        output := filter value:something.
+        output notNil ifTrue:[
+            outputStream nextPut:output
+        ]
+    ].
+    ^ something
+
 
     "Modified: 11.1.1997 / 16:12:52 / cg"
 ! !