summaryrefslogtreecommitdiff
path: root/cider-debug.el
diff options
context:
space:
mode:
Diffstat (limited to 'cider-debug.el')
-rw-r--r--cider-debug.el7
1 files changed, 2 insertions, 5 deletions
diff --git a/cider-debug.el b/cider-debug.el
index 8f41fd16..eb38df76 100644
--- a/cider-debug.el
+++ b/cider-debug.el
@@ -401,13 +401,10 @@ message."
(if (symbolp last-command-event)
(symbol-name last-command-event)
(ignore-errors
- (nrepl-dict-get cider--debug-mode-commands-dict
- (downcase (string last-command-event)))))
+ (concat ":" (nrepl-dict-get cider--debug-mode-commands-dict
+ (downcase (string last-command-event))))))
nil
(cider--uppercase-command-p)))
- (unless (or (string-prefix-p ":" command)
- (string-prefix-p "{" command))
- (setq command (concat ":" command)))
(when (and (string-prefix-p ":" command) force)
(setq command (format "{:response %s :force? true}" command)))
(cider-nrepl-send-unhandled-request