--- a/Tools_MethodList.st	Sun Apr 28 15:48:42 2013 +0200
+++ b/Tools_MethodList.st	Sun Apr 28 15:50:58 2013 +0200
@@ -1649,13 +1649,16 @@
 
                     state := lastResultOrNil result.
                     (state == TestResult statePass) ifTrue:[
-                        icn := SystemBrowser testCasePassedIcon
+                        icn := ToolbarIconLibrary testCasePassedIcon
                     ] ifFalse:[
-                        ((state == TestResult stateError)
-                        or:[ (state == TestResult stateFail) ]) ifTrue:[
-                            icn := SystemBrowser testCaseFailedIcon
+                        (state == TestResult stateError) ifTrue:[
+                            icn := ToolbarIconLibrary testCaseErrorIcon
                         ] ifFalse:[
-                            icn := SystemBrowser testCaseSkippedIcon
+                            (state == TestResult stateFail) ifTrue:[
+                                icn := ToolbarIconLibrary testCaseFailedIcon
+                            ] ifFalse:[
+                                icn := ToolbarIconLibrary testCaseSkippedIcon
+                            ] 
                         ] 
                     ]
                 ].
@@ -1813,10 +1816,10 @@
 !MethodList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.86 2013-04-25 13:10:03 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.87 2013-04-28 13:50:58 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.86 2013-04-25 13:10:03 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.87 2013-04-28 13:50:58 cg Exp $'
 ! !