--- a/Tools_MethodList.st	Wed Apr 03 15:09:59 2013 +0200
+++ b/Tools_MethodList.st	Wed Apr 03 15:24:44 2013 +0200
@@ -1643,12 +1643,19 @@
 
                 lastResultOrNil := cls rememberedOutcomeFor:selector.
                 lastResultOrNil notNil ifTrue:[
-                    (lastResultOrNil result == TestResult statePass) ifTrue:[
+                    |state|
+
+                    state := lastResultOrNil result.
+                    (state == TestResult statePass) ifTrue:[
                         icn := SystemBrowser testCasePassedIcon
                     ] ifFalse:[
-                        ((lastResultOrNil result == TestResult stateError)
-                        or:[ (lastResultOrNil result == TestResult stateFail) ]) ifTrue:[
+                        ((state == TestResult stateError)
+                        or:[ (state == TestResult stateFail) ]) ifTrue:[
                             icn := SystemBrowser testCaseFailedIcon
+                        ] ifFalse:[
+                            (state == TestResult stateSkip) ifTrue:[
+                                icn := SystemBrowser testCaseSkippedIcon
+                            ] 
                         ] 
                     ]
                 ].
@@ -1806,10 +1813,10 @@
 !MethodList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.81 2013-03-28 17:22:01 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.82 2013-04-03 13:24:44 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.81 2013-03-28 17:22:01 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.82 2013-04-03 13:24:44 cg Exp $'
 ! !