--- a/RegressionTests__ClassDescriptionTests.st	Wed Jun 29 21:40:53 2016 +0100
+++ b/RegressionTests__ClassDescriptionTests.st	Thu Jun 30 09:02:08 2016 +0100
@@ -18,16 +18,16 @@
     [
 
     pool := SharedPool subclass: #NewSharedPool1
-        instanceVariableNames: ''
-        classVariableNames: 'PoolVar1 PoolVar2'
-        poolDictionaries: ''
-        category: 'System-Compiler-Mocks'.
+	instanceVariableNames: ''
+	classVariableNames: 'PoolVar1 PoolVar2'
+	poolDictionaries: ''
+	category: 'System-Compiler-Mocks'.
 
     class := Object subclass: #NewClass
-        instanceVariableNames: 'instVar1'
-        classVariableNames: ''
-        poolDictionaries: 'NewSharedPool1'
-        category: 'System-Compiler-Mocks'.
+	instanceVariableNames: 'instVar1'
+	classVariableNames: ''
+	poolDictionaries: 'NewSharedPool1'
+	category: 'System-Compiler-Mocks'.
 
     self assert: (Smalltalk at:#NewClass)  instVarNames asArray = #(instVar1).
     self assert: (Smalltalk at:#NewClass) sharedPoolNames asArray = #(NewSharedPool1).
@@ -38,7 +38,7 @@
     self assert: (Smalltalk at:#NewClass) sharedPoolNames asArray = #(NewSharedPool1).
 
     ] ensure:[
-        Smalltalk removeClass: (Smalltalk at:#NewSharedPool1); removeClass: (Smalltalk at:#NewClass).
+	Smalltalk removeClass: (Smalltalk at:#NewSharedPool1); removeClass: (Smalltalk at:#NewClass).
     ]
 
     "Created: / 10-07-2013 / 14:04:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"