Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Already on GitHub? Sign in to your account

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

Merged
merged 1 commit into from Aug 4, 2012
Jump to file or symbol
Failed to load files and symbols.
+3 −1
Split
View
@@ -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))