--- a/Metaclass.st	Wed Jan 27 16:57:31 2016 +0100
+++ b/Metaclass.st	Wed Jan 27 16:58:44 2016 +0100
@@ -111,6 +111,8 @@
     "Modified: 23.4.1996 / 15:59:44 / cg"
 ! !
 
+
+
 !Metaclass methodsFor:'Compatibility-ST80'!
 
 comment:aString
@@ -129,7 +131,6 @@
     "Created: / 1.11.1997 / 13:16:45 / cg"
 ! !
 
-
 !Metaclass methodsFor:'autoload check'!
 
 isLoaded
@@ -301,23 +302,23 @@
 !
 
 name:newName inEnvironment:aNameSpaceOrOwningClass
-	     subclassOf:aClass
-	     instanceVariableNames:stringOfInstVarNames
-	     variable:variableBoolean
-	     words:wordsBoolean
-	     pointers:pointersBoolean
-	     classVariableNames:stringOfClassVarNames
-	     poolDictionaries:stringOfPoolNames
-	     category:categoryString
-	     comment:commentString
-	     changed:changed
-	     classInstanceVariableNames:stringOfClassInstVarNamesOrNil
+             subclassOf:aClass
+             instanceVariableNames:stringOfInstVarNames
+             variable:variableBoolean
+             words:wordsBoolean
+             pointers:pointersBoolean
+             classVariableNames:stringOfClassVarNames
+             poolDictionaries:stringOfPoolNames
+             category:categoryString
+             comment:commentString
+             changed:changed
+             classInstanceVariableNames:stringOfClassInstVarNamesOrNil
 
     "this is the main workhorse for installing new classes - special care
      has to be taken, when changing an existing classes definition. In this
      case, some or all of the methods and subclasses methods have to be
      recompiled.
-     Also, the old class(es) are still kept (but not accessable as a global),
+     Also, the old class(es) are still kept (but not accessible as a global),
      to allow existing instances some life.
      This might change in the future.
     "
@@ -325,18 +326,18 @@
 
     builder := self newClassBuilder.
     builder name:newName
-	inEnvironment:aNameSpaceOrOwningClass
-	subclassOf:aClass
-	instanceVariableNames:stringOfInstVarNames
-	variable:variableBoolean
-	words:wordsBoolean
-	pointers:pointersBoolean
-	classVariableNames:stringOfClassVarNames
-	poolDictionaries:stringOfPoolNames
-	category:categoryString
-	comment:commentString
-	changed:changed
-	classInstanceVariableNames:stringOfClassInstVarNamesOrNil.
+        inEnvironment:aNameSpaceOrOwningClass
+        subclassOf:aClass
+        instanceVariableNames:stringOfInstVarNames
+        variable:variableBoolean
+        words:wordsBoolean
+        pointers:pointersBoolean
+        classVariableNames:stringOfClassVarNames
+        poolDictionaries:stringOfPoolNames
+        category:categoryString
+        comment:commentString
+        changed:changed
+        classInstanceVariableNames:stringOfClassInstVarNamesOrNil.
     ^ builder buildClass.
 !