--- a/TestCoverageReporter.st	Tue Jan 16 22:14:38 2018 +0100
+++ b/TestCoverageReporter.st	Thu Jan 25 19:45:45 2018 +0100
@@ -195,13 +195,13 @@
 
 reportXml_cobertura
 "
- self new 
-        stream:Transcipt;
+ self new
+        stream:Transcript;
         reportXml_coberturaForPackage:'stx:libbasic'
 "
     "generate cobertura compatible XML coverage report format"
 
-    |instrumentedClasses uninstrumentedClasses 
+    |instrumentedClasses uninstrumentedClasses
      version lineRate branchRate
      linesCovered linesValid branchesCovered branchesValid complexity|
 
@@ -214,8 +214,8 @@
     branchesValid := 1000.
     complexity := 1.5.
 
-    instrumentedClasses := OrderedCollection new.    
-    uninstrumentedClasses := OrderedCollection new.    
+    instrumentedClasses := OrderedCollection new.
+    uninstrumentedClasses := OrderedCollection new.
 
     packages do:[:eachPackageID |
         Smalltalk allClassesInPackage:eachPackageID do:[:eachClass |
@@ -248,6 +248,8 @@
 
     stream
         nextPutAll: '</coverage'.
+
+    "Modified (comment): / 25-01-2018 / 19:45:29 / mawalch"
 ! !
 
 !TestCoverageReporter methodsFor:'reporting-private'!