Add `ex-data` output to `stacktrace` fn

2013-06-07 20:15:07 +07:00 · 2013-06-07 20:15:07 +07:00 · eaa4495e49
parent f1d2d89713
commit eaa4495e49
1 changed files with 2 additions and 1 deletions
--- a/src/taoensso/timbre.clj
+++ b/src/taoensso/timbre.clj
@ -40,7 +40,8 @@

 (defn stacktrace [throwable & [separator]]
  (when throwable
-    (str (when-let [s separator] s) (stacktrace/pst-str throwable))))
+    (str separator (when-let [d (ex-data throwable)] (str d separator))
+         (stacktrace/pst-str throwable))))

 ;;;; Default configuration and appenders