[Issue marick#121] added a map of formatters

src/midje/ideas/reporting/junit_xml_format.clj

@@ -2,6 +2,18 @@
   midje.ideas.reporting.junit-xml-format)
 
 
-(defmulti report-junit-xml :type)
+(defmulti report-junit-xml :type
+  )
 
-(defmethod report-junit-xml :default [m] )
+(defmethod report-junit-xml :default [m] 
+  ;; code to create XML for the different types of failure report maps
+  ;; see string-format.clj for inspiration
+  )
+
+(defn report-junit-xml-summary [exit-after-tests?]
+  ;; code to create XML for summary of failed facts
+  ;; see string-format.clj for inspiration
+  )
+
+(def junit-xml-format-config { :single-fact-fn report-junit-xml
+                               :summary-fn report-junit-xml-summary })

src/midje/ideas/reporting/report.clj

@@ -1,7 +1,8 @@
 (ns ^{:doc "Renders the various reported fact evaluation results."}
   midje.ideas.reporting.report
   (:use clojure.test
-        [midje.ideas.reporting.string-format :only [report-strings-format-config]]))
+        [midje.ideas.reporting.string-format :only [report-strings-format-config]]
+        [midje.ideas.reporting.junit-xml-format :only [junit-xml-format-config]]))
 
 
 ;;; Configuration
@@ -16,6 +17,9 @@
              fns in the configuration map bound to this var."}
   *report-format-config* report-strings-format-config)
 
+(def formatters { "default" report-strings-format-config
+                  "junit-xml" junit-xml-format-config })
+
 (def report-single-fact (:single-fact-fn *report-format-config*))
 
 

test/midje/internal_ideas/t_fakes.clj

@@ -355,7 +355,6 @@ odd?                   3               falsey)
         second-half {:data-fake true :var #'var-for-merged     :contained {:replaced 222, :extra 3}}
         irrelevant  {:data-fake true :var #'var-for-irrelevant :contained {:retained :FOO :extra :BAR}}
         result (binding-map [first-half second-half irrelevant])]
-    (println (pr-str result))
     (.storage (result #'midje.internal-ideas.t-fakes/var-for-merged))     => {:retained 1, :replaced 222, :extra 3}
     (.storage (result #'midje.internal-ideas.t-fakes/var-for-irrelevant)) => {:retained :FOO, :extra :BAR}))