--- a/TestCase.st	Wed Jan 27 17:04:19 2016 +0100
+++ b/TestCase.st	Sat Feb 13 12:23:04 2016 +0100
@@ -312,6 +312,8 @@
 !TestCase class methodsFor:'misc ui support'!
 
 iconInBrowserSymbol
+    "the browser will use this as index into the toolbariconlibrary"
+
     <resource: #programImage>
 
     |lastResult|
@@ -320,15 +322,15 @@
 
     lastResult := self lastTestRunResultOrNil.
     lastResult notNil ifTrue:[
-	lastResult == TestResult statePass ifTrue:[
-	    ^ #testCasePassedIcon
-	].
-	lastResult == TestResult stateFail ifTrue:[
-	    ^ #testCaseFailedIcon
-	].
-	lastResult == TestResult stateError ifTrue:[
-	    ^ #testCaseErrorIcon
-	].
+        lastResult == TestResult statePass ifTrue:[
+            ^ #testCasePassedIcon
+        ].
+        lastResult == TestResult stateFail ifTrue:[
+            ^ #testCaseFailedIcon
+        ].
+        lastResult == TestResult stateError ifTrue:[
+            ^ #testCaseErrorIcon
+        ].
     ].
     ^ #testCaseClassIcon
 ! !