--- a/TestResultReporter.st	Fri Aug 05 16:31:05 2011 +0200
+++ b/TestResultReporter.st	Fri Aug 05 16:33:40 2011 +0200
@@ -382,7 +382,7 @@
     errorMessage := 'no message given'.
 
     stream
-        nextPutLine:('<%1 message="%2">' bindWith:stateString with:errorMessage).
+        nextPutLine:('    <%1 message="%2">' bindWith:stateString with:errorMessage).
 
     "
         Prints a traceback to the stream.
@@ -394,7 +394,7 @@
         ifTrue:[^self reportXml_jUnitTracebackStX: test].
 
     stream
-        nextPutLine:('</%">' bindWith:stateString).
+        nextPutLine:('    </%">' bindWith:stateString).
 
     "Created: / 05-08-2011 / 15:40:09 / cg"
 !
@@ -411,14 +411,15 @@
     ].
 
     stream
-        nextPutAll:'<testcase classname="'; nextPutAll:testClassName; nextPutLine:'"'; 
-        tab; nextPutAll:'name="'; nextPutAll: test selector; nextPutLine:'"';
-        tab; nextPutAll:'status="'; nextPutAll: testResult; nextPutLine:'"';
-        tab; nextPutAll:'time="'; nextPutAll: executionTime; nextPutLine:'"'.
+        nextPutAll:'  <testcase classname="'; nextPutAll:testClassName; nextPutAll:'"'; 
+        nextPutAll:' name="'; nextPutAll: test selector; nextPutAll:'"';
+        nextPutAll:' status="'; nextPutAll: testResult; nextPutAll:'"';
+        nextPutAll:' time="'; nextPutAll: executionTime; nextPutAll:'"';
+        nextPutLine:'>'.
 
     testResult ~= #success ifTrue:[self reportXml_jUnitResultAndTraceback:test state:testResult].
 
-    stream nextPutLine:'</testcase>'.
+    stream nextPutLine:'  </testcase>'.
 
     "Created: / 05-08-2011 / 15:22:13 / cg"
 !
@@ -669,11 +670,11 @@
 !TestResultReporter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.20 2011-08-05 14:31:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.21 2011-08-05 14:33:40 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.20 2011-08-05 14:31:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestResultReporter.st,v 1.21 2011-08-05 14:33:40 cg Exp $'
 !
 
 version_SVN