--- a/TestResultReporter.st Tue Mar 26 18:39:32 2019 +0100
+++ b/TestResultReporter.st Tue Mar 26 19:05:01 2019 +0100
@@ -569,11 +569,14 @@
reportXml_jUnitTest:testOutcome
|testClassName testClass testClassSourceFile executionTime executionTimeString
- test testResult javaPackagePrefix|
+ test testResult testResultXML javaPackagePrefix|
test := testOutcome testCase.
- testResult := testOutcome result.
-
+ testResult := testResultXML := testOutcome result.
+ testResult = 'skip' ifTrue:[
+ testResultXML := 'skipped'
+ ].
+
testClassName := self sunitNameOf: test class.
"/ prepend package, so it looks like a Java-class path
javaPackagePrefix := (test class package copyTransliterating:':/' to:'..'),'.'.
@@ -588,7 +591,7 @@
nextPutAll:' <testcase';
nextPutAll:(' classname="%1"' bindWith:(javaPackagePrefix,testClassName));
nextPutAll:(' name="%1"' bindWith:test selector);
- nextPutAll:(' status="%1"' bindWith:testResult);
+ nextPutAll:(' status="%1"' bindWith:testResultXML);
nextPutAll:(' time="%1"' bindWith:executionTimeString).
((testResult = TestResult statePass or:[testResult = TestResult stateSkip])
@@ -597,8 +600,7 @@
] ifFalse:[
stream nextPutAll:'>'; cr.
- (testResult ~= TestResult statePass
- and:[testResult ~= TestResult stateSkip]) ifTrue:[
+ (testResult ~= TestResult statePass and:[testResult ~= TestResult stateSkip]) ifTrue:[
self reportXml_jUnitResultAndTraceback:testOutcome state:testResult.
"/ generate a link to the source file
@@ -625,7 +627,7 @@
].
"Created: / 18-08-2011 / 20:30:50 / cg"
- "Modified: / 26-03-2019 / 18:38:43 / Claus Gittinger"
+ "Modified: / 26-03-2019 / 19:04:54 / Claus Gittinger"
! !
!TestResultReporter methodsFor:'reporting - xml-perfPublisher'!