--- a/LoggingStream.st	Mon Aug 26 23:13:14 2019 +0200
+++ b/LoggingStream.st	Mon Aug 26 23:13:16 2019 +0200
@@ -1,5 +1,9 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:libbasic2' }"
 
+"{ NameSpace: Smalltalk }"
+
 Stream subclass:#LoggingStream
 	instanceVariableNames:'loggedStream logger'
 	classVariableNames:''
@@ -118,6 +122,7 @@
 nextPut:something
     self log:( '>>> ' , something storeString).
     loggedStream nextPut:something.
+    ^ something
 !
 
 nextPutAll:aCollection
@@ -160,10 +165,10 @@
 !LoggingStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/LoggingStream.st,v 1.7 2014-05-29 10:59:23 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/LoggingStream.st,v 1.7 2014-05-29 10:59:23 cg Exp $'
+    ^ '$Header$'
 ! !