--- a/Context.st	Wed May 14 00:56:59 2014 +0200
+++ b/Context.st	Wed May 14 12:09:45 2014 +0200
@@ -280,12 +280,6 @@
 
 !Context methodsFor:'accessing'!
 
-arg1Index
-    "return the index of the 1st arg (redefined in JavaContext)"
-
-    ^ 1
-!
-
 argAt:n
     "return the n'th argument"
 
@@ -1606,14 +1600,15 @@
 
     n := self numArgs.
     1 to:n do:[:index |
-	Error handle:[:ex |
-	    s := '*Error in argString*'.
-	] do:[
-	    s := self argStringFor:(self at:index).
-	].
-
-	aStream nextPutAll:(s contractTo:100).
-	index ~~ n ifTrue:[ aStream space ].
+        Error handle:[:ex |
+            s := '*Error in argString*'.
+        ] do:[
+            s := self argStringFor:(self at:index).
+            s := s contractTo:100.
+        ].
+
+        aStream nextPutAll:s.
+        index ~~ n ifTrue:[ aStream space ].
     ].
 
     "Modified: / 07-03-2012 / 13:09:17 / cg"
@@ -2606,11 +2601,11 @@
 !Context class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.200 2014-03-16 16:44:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.201 2014-05-14 10:09:45 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.200 2014-03-16 16:44:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.201 2014-05-14 10:09:45 stefan Exp $'
 !
 
 version_HG