TestResultReporter.st
changeset 494 105cb02e6a15
parent 491 cb1adb873328
child 495 760963f18667
--- a/TestResultReporter.st	Tue Nov 06 09:14:19 2012 +0100
+++ b/TestResultReporter.st	Tue Nov 06 11:13:50 2012 +0100
@@ -59,6 +59,13 @@
     |testResult|
 
     testResult := RegressionTests::IntegerTest suite run.
+    TestResultReporter report:testResult format:#xml_jUnit on:Transcript. 
+                                                                               [exEnd]
+
+                                                                               [exBegin]
+    |testResult|
+
+    testResult := RegressionTests::IntegerTest suite run.
     TestResultReporter report:testResult format:#xml_pythonUnit on:Transcript. 
                                                                                [exEnd]
 
@@ -453,13 +460,13 @@
     stream
         nextPutLine: '<?xml version="1.0"?>';
         nextPutAll: '<testsuite';
-        nextPutAll:(' tests="%1">' bindWith:result runCount);
-        nextPutAll:(' timestamp="%1">' bindWith:result timestamp printStringIso8601Format);
-        nextPutAll:(' time="%1">' bindWith:result executionTime);
+        nextPutAll:(' tests="%1"' bindWith:result runCount);
+        nextPutAll:(' timestamp="%1"' bindWith:result timestamp printStringIso8601Format);
+        nextPutAll:(' time="%1"' bindWith:result executionTime);
         nextPutAll:(' errors="%1"' bindWith:result errors size);
         nextPutAll:(' failures="%1"' bindWith:result failures size);
         nextPutAll:(' hostname="%1"' bindWith:OperatingSystem getHostName);
-        nextPutAll:(' name="%1">' bindWith:result name);
+        nextPutAll:(' name="%1"' bindWith:result name);
         nextPutLine: '>'.
     stream
         nextPutLine: '  <properties>';
@@ -816,11 +823,11 @@
 !TestResultReporter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.43 2012-11-06 02:02:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.44 2012-11-06 10:13:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.43 2012-11-06 02:02:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.44 2012-11-06 10:13:50 cg Exp $'
 !
 
 version_SVN