Also don't try to read the test results doc if it's empty.

2010-06-02 15:26:38 -07:00 · 2010-06-02 15:26:38 -07:00 · ab70dbeeef
commit ab70dbeeef
parent 8667bac839
1 changed files with 1 additions and 1 deletions
--- a/src/leiningen/test.clj
+++ b/src/leiningen/test.clj
@ -58,7 +58,7 @@ tests. If none are given, runs them all."
                     (with-version-guard
                       (form-for-testing-namespaces namespaces
                                                    (.getAbsolutePath result))))
-    (if (.exists result)
+    (if (and (.exists result) (pos? (.length result)))
      (let [summary (read-string (slurp (.getAbsolutePath result)))
            success? (zero? (+ (:error summary) (:fail summary)))]
        (.delete result)