--- a/Context.st	Fri Jun 13 12:36:20 2014 +0200
+++ b/Context.st	Fri Jun 13 12:37:03 2014 +0200
@@ -1772,9 +1772,9 @@
     self selector printOn:aStream.    "show as string (as symbol looks too ugly in browser ...)"
     "/ self selector storeOn:aStream.    "show as symbol"
     aStream normal.
-    aStream space.
+
     (method notNil and:[method isWrapped]) ifTrue:[
-	aStream nextPutAll:'(wrapped) '
+        aStream nextPutAll:' (wrapped) '
     ].
     aStream nextPutAll:' ['; nextPutAll:self lineNumber printString; nextPutAll:']' .
 
@@ -2609,11 +2609,11 @@
 !Context class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.205 2014-06-13 10:36:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.206 2014-06-13 10:37:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.205 2014-06-13 10:36:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.206 2014-06-13 10:37:03 cg Exp $'
 !
 
 version_HG