summaryrefslogtreecommitdiff
path: root/cider-debug.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2015-12-16 17:31:20 +0000
committerArtur Malabarba <bruce.connor.am@gmail.com>2016-01-15 23:21:31 +0000
commit91061afb77f241ba4f866c653d3e9ed49bf0bc5c (patch)
tree103902fc0eff4b33e8d1c81561f0a326668a3fdf /cider-debug.el
parentd52af8796f93edcd57b4151cad4b925dae5fbdd2 (diff)
Support a :stack status in cider--debug-response-handler
Diffstat (limited to 'cider-debug.el')
-rw-r--r--cider-debug.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/cider-debug.el b/cider-debug.el
index e5866ad3..17a27989 100644
--- a/cider-debug.el
+++ b/cider-debug.el
@@ -127,7 +127,10 @@ This variable must be set before starting the repl connection."
(defun cider--debug-response-handler (response)
"Handle responses from the cider.debug middleware."
(nrepl-dbind-response response (status id causes)
- (when (member "eval-error" status)
+ (when (or (member "eval-error" status)
+ (member "stack" status))
+ ;; TODO: Make the error buffer a bit friendlier when we're just printing
+ ;; the stack.
(cider--render-stacktrace-causes causes))
(when (member "need-debug-input" status)
(cider--handle-debug response))