--- a/reports/Builder__LintReportFormat.st	Tue Dec 16 11:30:03 2014 +0100
+++ b/reports/Builder__LintReportFormat.st	Tue Dec 16 11:42:55 2014 +0100
@@ -35,13 +35,15 @@
 
 !LintReportFormat methodsFor:'writing'!
 
-writeSource: source to: sourceFilename
-    (report outputDirectory / sourceFilename) writingFileDo:[ :s |
-        source fileOutOn: s
-    ].
+writeFile: filename with: block
+
+    "Writes a section for given file"
 
-    "Created: / 07-10-2011 / 10:19:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 15-12-2014 / 11:19:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    stream tab; nextPutAll:'<file name="'; nextPutAll:filename; nextPutAll: '">'; cr.
+    block valueWithOptionalArgument: self.
+    stream tab; nextPutAll:'</file>'; cr.
+
+    "Created: / 07-10-2011 / 10:40:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !LintReportFormat::CheckStyle class methodsFor:'accessing'!
@@ -130,17 +132,6 @@
 
 !LintReportFormat::PMD methodsFor:'writing'!
 
-writeFile: filename with: block
-
-    "Writes a section for given file"
-
-    stream tab; nextPutAll:'<file name="'; nextPutAll:filename; nextPutAll: '">'; cr.
-    block valueWithOptionalArgument: self.
-    stream tab; nextPutAll:'</file>'; cr.
-
-    "Created: / 07-10-2011 / 10:40:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
 writeFooter
 
     stream nextPutAll: '</pmd>'