Skip to content

Commit 55aba3d

Browse files
committed
Don't mark keymaps as functions
1 parent 64391e5 commit 55aba3d

File tree

3 files changed

+4
-4
lines changed

3 files changed

+4
-4
lines changed

cider-mode.el

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -174,7 +174,7 @@ Returns to the buffer in which the command was invoked."
174174
;;; The minor mode
175175
(defvar cider-mode-map
176176
(let ((map (make-sparse-keymap)))
177-
(define-key map (kbd "C-c C-d") #'cider-doc-map)
177+
(define-key map (kbd "C-c C-d") 'cider-doc-map)
178178
(define-key map (kbd "M-.") #'cider-find-var)
179179
(define-key map (kbd "C-c C-.") #'cider-find-ns)
180180
(define-key map (kbd "M-,") #'cider-pop-back)
@@ -206,7 +206,7 @@ Returns to the buffer in which the command was invoked."
206206
(define-key map (kbd "C-c C-k") #'cider-load-buffer)
207207
(define-key map (kbd "C-c C-l") #'cider-load-file)
208208
(define-key map (kbd "C-c C-b") #'cider-interrupt)
209-
(define-key map (kbd "C-c t") #'cider-test-commands-map)
209+
(define-key map (kbd "C-c t") 'cider-test-commands-map)
210210
(define-key map (kbd "C-c C-t") #'cider-test-show-report)
211211
(define-key map (kbd "C-c M-s") #'cider-selector)
212212
(define-key map (kbd "C-c M-r") #'cider-rotate-default-connection)

cider-repl.el

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1124,7 +1124,7 @@ constructs."
11241124

11251125
(defvar cider-repl-mode-map
11261126
(let ((map (make-sparse-keymap)))
1127-
(define-key map (kbd "C-c C-d") #'cider-doc-map)
1127+
(define-key map (kbd "C-c C-d") 'cider-doc-map)
11281128
(define-key map (kbd "M-.") #'cider-find-var)
11291129
(define-key map (kbd "C-c C-.") #'cider-find-ns)
11301130
(define-key map (kbd "M-,") #'cider-pop-back)

cider-test.el

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -127,7 +127,7 @@
127127

128128
(defvar cider-test-report-mode-map
129129
(let ((map (make-sparse-keymap)))
130-
(define-key map (kbd "C-c t") #'cider-test-commands-map)
130+
(define-key map (kbd "C-c t") 'cider-test-commands-map)
131131
(define-key map (kbd "M-p") #'cider-test-previous-result)
132132
(define-key map (kbd "M-n") #'cider-test-next-result)
133133
(define-key map (kbd "M-.") #'cider-test-jump)

0 commit comments

Comments
 (0)