--- a/CompressionStream.st	Mon Oct 05 01:53:18 2009 +0200
+++ b/CompressionStream.st	Mon Oct 05 11:20:41 2009 +0200
@@ -643,17 +643,20 @@
     limit := inputBytes size.
 
     aCollection do:[:aByteOrCharacter|
-	position == limit ifTrue:[self flush].
-	position := position + 1.
-	inputBytes at:position put:aByteOrCharacter asInteger.
+        position == limit ifTrue:[self flush].
+        position := position + 1.
+        inputBytes at:position put:aByteOrCharacter asInteger.
     ].
-    ^ aCollection
 ! !
 
 !CompressionStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/CompressionStream.st,v 1.27 2009-08-03 13:38:25 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/CompressionStream.st,v 1.28 2009-10-05 09:20:41 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic2/CompressionStream.st,v 1.28 2009-10-05 09:20:41 cg Exp $'
 ! !
 
 CompressionStream initialize!