aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/clojure/contrib/stacktrace.clj2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/stacktrace.clj b/src/clojure/contrib/stacktrace.clj
index b3d8d866..c412b119 100644
--- a/src/clojure/contrib/stacktrace.clj
+++ b/src/clojure/contrib/stacktrace.clj
@@ -63,7 +63,7 @@
(print-stack-trace tr n)
(when-let [cause (.getCause tr)]
(print "Caused by: " )
- (print-stack-trace cause n))))
+ (recur cause n))))
(defn e
"REPL utility. Prints a brief stack trace for the root cause of the