ActorStream.st
changeset 4790 bacf758a10cc
parent 4768 a03651751649
child 4968 99de1b56d09f
--- a/ActorStream.st	Thu Jan 10 16:26:33 2019 +0100
+++ b/ActorStream.st	Mon Jan 14 18:25:27 2019 +0100
@@ -142,11 +142,13 @@
      If there is no nextPutAllBlock, nextPuts will be used (as inherited)"
 
     nextPutAllBlock notNil ifTrue:[    
-        nextPutAllBlock value:(something copyFrom:start to:stop)
+        nextPutAllBlock value:(something copyFrom:start to:stop).
+        ^ self.
     ].
     super nextPutAll:something startingAt:start to:stop
 
     "Modified: / 22-11-2018 / 12:52:51 / Stefan Vogel"
+    "Modified: / 14-01-2019 / 18:23:40 / Claus Gittinger"
 !
 
 nextPutByte:something