Modify clojure.test.junit/with-junit-output to support multiple forms

Fixes CLJ-1485

Signed-off-by: Stuart Halloway <[email protected]>

Author: hlship

src/clj/clojure/test/junit.clj

@@ -190,6 +190,6 @@
      (t/with-test-out
        (println "<?xml version=\"1.0\" encoding=\"UTF-8\"?>")
        (println "<testsuites>"))
-     (let [result# ~@body]
+     (let [result# (do ~@body)]
        (t/with-test-out (println "</testsuites>"))
        result#)))