--- a/TestResultReporter.st	Mon Nov 05 22:04:14 2012 +0100
+++ b/TestResultReporter.st	Mon Nov 05 22:04:38 2012 +0100
@@ -477,6 +477,7 @@
         nextPutLine: '  </properties>'.
 
     result passedOutcomes  do:[:eachOutcome | self reportXml_jUnitTest: eachOutcome ].
+    result skippedOutcomes  do:[:eachOutcome | self reportXml_jUnitTest: eachOutcome ].
     result failureOutcomes do:[:eachOutcome | self reportXml_jUnitTest: eachOutcome ].
     result errorOutcomes   do:[:eachOutcome | self reportXml_jUnitTest: eachOutcome ].
 
@@ -541,7 +542,7 @@
         nextPutAll:(' status="%1"' bindWith:testResult);
         nextPutAll:(' time="%1"' bindWith:executionTimeString).
 
-    testResult = #pass ifTrue:[
+    testResult = (TestResult statePass) ifTrue:[
         stream nextPutAll:' />'; cr.
     ] ifFalse:[
         stream nextPutAll:'>'; cr.
@@ -607,6 +608,7 @@
 
     result passedOutcomes  do:[:each|self reportXml_perfPublisher: each result: #success].
     result failureOutcomes do:[:each|self reportXml_perfPublisher: each result: #failure].
+    result skippedOutcomes  do:[:each|self reportXml_perfPublisher: each result: #error].
     result errorOutcomes   do:[:each|self reportXml_perfPublisher: each result: #error].
 
     stream
@@ -725,6 +727,7 @@
         nextPutLine: '<unittest-results>'.
 
     result passedOutcomes  do:[:each|self reportXml_pythonUnitTest: each result: #success].
+    result skippedOutcomes  do:[:each|self reportXml_pythonUnitTest: each result: #error].
     result failureOutcomes do:[:each|self reportXml_pythonUnitTest: each result: #failure].
     result errorOutcomes   do:[:each|self reportXml_pythonUnitTest: each result: #error].
 
@@ -812,11 +815,11 @@
 !TestResultReporter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.41 2012-10-25 22:23:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.42 2012-11-05 21:04:38 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.41 2012-10-25 22:23:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.42 2012-11-05 21:04:38 cg Exp $'
 !
 
 version_SVN