--- a/Tools__ClassList.st	Thu Sep 22 15:19:13 2016 +0200
+++ b/Tools__ClassList.st	Thu Sep 22 15:20:08 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2004 by eXept Software AG
               All Rights Reserved
@@ -812,20 +814,20 @@
     selected := self getSelectedClassesFromIndices.
     (selected = lastSelectedClasses and:[selected size == 1])
     ifTrue:[
-	"/ thats a kludge - we want to turn off the protocol selection,
-	"/ when a class is reselected.
+        "/ that's a kludge - we want to turn off the protocol selection,
+        "/ when a class is reselected.
 
-	masterApplication notNil ifTrue:[
-	    master := masterApplication.
-	    masterApplication masterApplication notNil ifTrue:[
-		master := masterApplication masterApplication.
-	    ].
-	    (master respondsTo:#classReselected) ifTrue:[
-		master classReselected.
-	    ].
-	] 
+        masterApplication notNil ifTrue:[
+            master := masterApplication.
+            masterApplication masterApplication notNil ifTrue:[
+                master := masterApplication masterApplication.
+            ].
+            (master respondsTo:#classReselected) ifTrue:[
+                master classReselected.
+            ].
+        ] 
     ] ifFalse:[
-	lastSelectedClasses := selected copy.
+        lastSelectedClasses := selected copy.
     ]
 !