Skip to content

Commit d7763fe

Browse files
author
Bozhidar Batsov
committed
[Fix #681] Add a few extra keybindings to cider-macroexpansion-minor-mode-map
1 parent 1a63524 commit d7763fe

File tree

1 file changed

+4
-1
lines changed

1 file changed

+4
-1
lines changed

cider-macroexpansion.el

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -66,7 +66,7 @@ This variable specifies both what was expanded and the expander.")
6666
"Macroexpand, use EXPANDER, the given EXPR."
6767
(let* ((expansion (cider-macroexpansion expander expr)))
6868
(setq cider-last-macroexpand-expression expr)
69-
(cider-initialize-macroexpansion-buffer expansion nrepl-buffer-ns)))
69+
(cider-initialize-macroexpansion-buffer expansion (cider-current-ns))))
7070

7171
(defun cider-macroexpand-expr-inplace (expander)
7272
"Substitute the form preceding point with its macroexpansion using EXPANDER."
@@ -146,6 +146,9 @@ and point is placed at CURRENT-POINT."
146146
(let ((map (make-sparse-keymap)))
147147
(define-key map (kbd "g") 'cider-macroexpand-again)
148148
(define-key map (kbd "q") 'cider-popup-buffer-quit-function)
149+
(define-key map (kbd "d") 'cider-doc)
150+
(define-key map (kbd "j") 'cider-javadoc)
151+
(define-key map (kbd ".") 'cider-jump-to-var)
149152
(cl-labels ((redefine-key (from to)
150153
(dolist (mapping (where-is-internal from cider-mode-map))
151154
(define-key map mapping to))))

0 commit comments

Comments
 (0)