--- a/Scanner.st	Wed Aug 23 23:58:22 2017 +0200
+++ b/Scanner.st	Thu Aug 24 13:59:16 2017 +0200
@@ -710,13 +710,13 @@
     self nextToken.
 
     [token notNil] whileTrue:[
-        token == $( ifTrue:[
-            self nextToken.
-            tokens add:(readArray value)
-        ] ifFalse:[
-            tokens add:token
-        ].
-        self nextToken
+	token == $( ifTrue:[
+	    self nextToken.
+	    tokens add:(readArray value)
+	] ifFalse:[
+	    tokens add:token
+	].
+	self nextToken
     ].
     ^ tokens
 
@@ -726,12 +726,12 @@
      Scanner new scanTokens:'translate (200px 100px)'
 
      Scanner new
-        scanTokens:'Boolean subclass:#True
-                                instanceVariableNames:''''
-                                classVariableNames:''''
-                                poolDictionaries:''''
-                                category:''Kernel-Objects''
-        '
+	scanTokens:'Boolean subclass:#True
+				instanceVariableNames:''''
+				classVariableNames:''''
+				poolDictionaries:''''
+				category:''Kernel-Objects''
+	'
     "
 
     "Modified: / 23-08-2017 / 23:58:03 / cg"