Permalink
Browse files

Try .toString on current-exception before defaulting to "No message."

  • Loading branch information...
1 parent 57844d3 commit bb2264ebf09bceb0f90da42ecf5718ab3fc0ed0d @ryfow ryfow committed Aug 1, 2012
Showing with 3 additions and 1 deletion.
  1. +3 −1 src/swank/core.clj
View
4 src/swank/core.clj
@@ -142,7 +142,9 @@ values."
(map #(exception-str width %) (.getStackTrace #^Throwable t)))))
(defmethod debugger-condition-for-emacs :default []
- (list (or (.getMessage #^Throwable *current-exception*) "No message.")
+ (list (or (.getMessage #^Throwable *current-exception*)
+ (.toString #^Throwable *current-exception*)
+ "No message.")
(str " [Thrown " (class *current-exception*) "]")
nil))

0 comments on commit bb2264e

Please sign in to comment.