Use updated clj-stacktrace API.

mmcgrana · Nov 1, 2009 · fd24e61 · fd24e61
1 parent 7146d69
commit fd24e61
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/src/clj_unit/console_reporter.clj b/src/clj_unit/console_reporter.clj
@@ -1,6 +1,7 @@
 (ns clj-unit.console-reporter
-  (:use clj-unit.utils clojure.contrib.str-utils
-        (clj-backtrace core repl)))
+  (:use (clj-unit utils)
+        (clojure.contrib str-utils)
+        (clj-stacktrace core repl)))
 
 (defn- test-runner-elem?
   [elem]
@@ -14,9 +15,8 @@
   (let [parsed (parse-exception e)
         elems  (:trace-elems parsed)
         user-elems (take-while (complement test-runner-elem?) elems)]
-    (binding [*use-color* true]
-      (println (with-color :red (str e)))
-      (print-trace-elems user-elems))))
+    (pst-message-on *out* true (str e))
+    (pst-elems-on *out* true user-elems)))
 
 (def +console-reporter+
   {:init