--- a/Future.st	Mon Sep 09 18:12:56 2019 +0200
+++ b/Future.st	Wed Sep 11 16:52:34 2019 +0200
@@ -254,12 +254,12 @@
      but ensure that any messages sent to me before execution
      of the block has terminated are suspended until it has terminated."
 
-    self signalSemaphoreAfterForked:[aBlock value] atPriority:prio
+    self signalSemaphoreAfterForked:aBlock atPriority:prio
 
     "Created: / 04-10-2011 / 14:53:21 / cg"
     "Modified: / 09-08-2017 / 11:54:38 / cg"
-    "Modified: / 12-02-2019 / 20:27:52 / Stefan Vogel"
     "Modified (comment): / 25-06-2019 / 07:50:20 / Claus Gittinger"
+    "Modified: / 11-09-2019 / 16:19:48 / Stefan Vogel"
 !
 
 priority:prio block: aBlock value: aValue