--- a/reports/Builder__Report.st	Wed May 15 20:07:36 2013 +0200
+++ b/reports/Builder__Report.st	Wed May 15 20:07:49 2013 +0200
@@ -3,7 +3,7 @@
 "{ NameSpace: Builder }"
 
 Object subclass:#Report
-	instanceVariableNames:'name format'
+	instanceVariableNames:'name packages format'
 	classVariableNames:'Verbose OutputDir'
 	poolDictionaries:''
 	category:'Builder-Reports'
@@ -213,11 +213,12 @@
         long: '--package';
         description: 'Package in which to run the report';
         action:[:option | 
-            self loadPackageIfNotAlready: option.
-            self setupForPackages: { option } 
+            packages isNil ifTrue:[ packages := Set new ].
+            packages add: option.
         ]
 
     "Created: / 06-11-2011 / 21:49:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-05-2013 / 19:02:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !Report methodsFor:'accessing-defaults'!
@@ -348,11 +349,18 @@
 setUp
 
     | stream | 
+
+    packages notNil ifTrue:[
+        packages do:[:pkg| self loadPackageIfNotAlready: pkg].
+        self setupForPackages: packages.
+        packages := nil.
+    ].
     format isNil ifTrue:[format := self defaultFormat].
     stream := (OutputDir / (self encodeFilename: ('%1-%2.%3' bindWith: self name with: self defaultFileSuffix with: format defaultFileSuffix))) writeStream.
     format report: self stream: stream
 
     "Created: / 04-08-2011 / 12:43:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 15-05-2013 / 19:03:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 tearDown
@@ -373,7 +381,7 @@
 !
 
 version_SVN
-    ^ '§Id: Builder__Report.st 294 2011-11-27 11:08:02Z vranyj1 §'
+    ^ '$Id$'
 ! !