*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 11 May 2005 11:22:10 +0200
changeset 8877 22c94e25d81b
parent 8876 dc094269db8e
child 8878 7c7825a1f269
*** empty log message ***
Process.st
--- a/Process.st	Mon May 09 09:25:37 2005 +0200
+++ b/Process.st	Wed May 11 11:22:10 2005 +0200
@@ -1917,7 +1917,12 @@
 environmentAt:aKey
     "return the value of a thread local variable, or raise an error, if no such variable exists"
 
-    ^ self environmentAt:aKey ifAbsent:[self error:'no such variable' mayProceed:true. nil ]
+    ^ self 
+        environmentAt:aKey 
+        ifAbsent:[
+            self error:'no such variable' mayProceed:true. 
+            nil 
+        ]
 !
 
 environmentAt:aKey ifAbsent:defaultValue
@@ -1983,7 +1988,7 @@
 !Process class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Process.st,v 1.152 2005-03-14 22:29:26 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Process.st,v 1.153 2005-05-11 09:22:10 cg Exp $'
 ! !
 
 Process initialize!