summaryrefslogtreecommitdiff
path: root/cider-debug.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2015-09-09 22:40:54 +0100
committerArtur Malabarba <bruce.connor.am@gmail.com>2015-09-09 22:42:31 +0100
commit7427dde50a69d1623b4c9051a5c4b1657f7487da (patch)
tree2561e037a61453e60daafc29e6aee312fcb61223 /cider-debug.el
parente1d12c33b4ad57b5a003a5e96fb50997055e1791 (diff)
Fix a debugging corner-case
In some situations, the debugging session happens on a buffer different from the one where evaluation started. In these cases, there is no spinner on that buffer.
Diffstat (limited to 'cider-debug.el')
-rw-r--r--cider-debug.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/cider-debug.el b/cider-debug.el
index 77239704..bbbe40f5 100644
--- a/cider-debug.el
+++ b/cider-debug.el
@@ -303,7 +303,7 @@ In order to work properly, this mode must be activated by
(nrepl-dbind-response cider--debug-mode-response (input-type)
;; A debug session is an ongoing eval, but it's annoying to have the
;; spinner spinning while you debug.
- (spinner-stop)
+ (when spinner-current (spinner-stop))
(setq-local tool-bar-map cider--debug-mode-tool-bar-map)
(add-hook 'kill-buffer-hook #'cider--debug-quit nil 'local)
(add-hook 'before-revert-hook #'cider--debug-quit nil 'local)