--- a/VariableNode.st	Thu Jan 30 09:41:36 2020 +0100
+++ b/VariableNode.st	Wed Feb 05 17:25:35 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
@@ -934,7 +936,7 @@
         token value:aValue. ^ aValue
     ].
     (type == #ThreadLocal) ifTrue:[
-        ^ Processor activeProcess environmentAt:name asSymbol put:aValue. ^ aValue
+        ^ Processor activeProcess environmentAt:name asSymbol put:aValue.
     ].
 
     "not reached"
@@ -942,6 +944,7 @@
     ^ aValue
 
     "Modified: / 05-12-2011 / 18:43:56 / cg"
+    "Modified: / 05-02-2020 / 16:59:34 / Stefan Vogel"
 ! !