Simplify kaocha fail reporting

polyfy · Mar 25, 2022 · 3407843 · 3407843
1 parent eb7d3be
commit 3407843
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 8 deletions.
diff --git a/bases/kaocha-test-runner-example/src/polylith/clj/core/kaocha_test_runner_example.clj b/bases/kaocha-test-runner-example/src/polylith/clj/core/kaocha_test_runner_example.clj
@@ -1,7 +1,6 @@
 (ns polylith.clj.core.kaocha-test-runner-example
   (:require
-   [polylith.clj.core.test-runner-plugin.interface :as test-runner-plugin]
-   [polylith.clj.core.util.interface.color :as color]))
+   [polylith.clj.core.test-runner-plugin.interface :as test-runner-plugin]))
 
 (defn rf-some
   "Reducing function that returns the first logical true value.
@@ -70,7 +69,7 @@
       (run-tests [this {:keys [color-mode eval-in-project is-verbose] :as opts}]
         (when (test-runner-plugin/tests-present? this opts)
           (let [config (->test-plan-config eval-in-project)
-                {:kaocha.result/keys [count pass error fail pending]}
+                {:kaocha.result/keys [error fail]}
                 (eval-in-project
                  `(do
                     (require 'kaocha.repl 'kaocha.api 'kaocha.result)
@@ -82,7 +81,6 @@
                         (kaocha.repl/config)
                         (kaocha.api/run)
                         (:kaocha.result/tests)
-                        (kaocha.result/totals))))
-                result-str (str "Test results (total " count "): " pass " passes, " pending " pending, " fail " failures, " error " errors.")]
-            (when (or (< 0 error) (< 0 fail))
-              (throw (Exception. (str "\n" (color/error color-mode result-str)))))))))))
+                        (kaocha.result/totals))))]
+            (when (or (some nil? [error fail]) (< 0 error) (< 0 fail))
+              (throw (Exception. "\nTests failed.")))))))))
diff --git a/projects/kaocha-test-runner-example/deps.edn b/projects/kaocha-test-runner-example/deps.edn
@@ -4,7 +4,6 @@
 
 {:deps {poly/kaocha-test-runner-example {:local/root "../../bases/kaocha-test-runner-example"}
         poly/test-runner-plugin         {:local/root "../../components/test-runner-plugin"}
-        poly/util                       {:local/root "../../components/util"}
 
         org.clojure/clojure {:mvn/version "1.10.3"}}