Use #' where appropriate

Author: bbatsov

cider-repl.el

@@ -1001,43 +1001,43 @@ constructs."
 (defvar cider-repl-mode-map
   (let ((map (make-sparse-keymap)))
     (set-keymap-parent map clojure-mode-map)
-    (define-key map (kbd "C-c C-d") 'cider-doc-map)
-    (define-key map (kbd "M-.") 'cider-find-var)
+    (define-key map (kbd "C-c C-d") #'cider-doc-map)
+    (define-key map (kbd "M-.") #'cider-find-var)
     (define-key map (kbd "C-c C-.") #'cider-find-ns)
-    (define-key map (kbd "M-,") 'cider-jump-back)
-    (define-key map (kbd "C-c M-.") 'cider-find-resource)
-    (define-key map (kbd "RET") 'cider-repl-return)
-    (define-key map (kbd "TAB") 'cider-repl-tab)
-    (define-key map (kbd "C-<return>") 'cider-repl-closing-return)
-    (define-key map (kbd "C-j") 'cider-repl-newline-and-indent)
-    (define-key map (kbd "C-c C-o") 'cider-repl-clear-output)
-    (define-key map (kbd "C-c M-o") 'cider-repl-clear-buffer)
-    (define-key map (kbd "C-c M-n") 'cider-repl-set-ns)
-    (define-key map (kbd "C-c C-u") 'cider-repl-kill-input)
-    (define-key map (kbd "C-S-a") 'cider-repl-bol-mark)
-    (define-key map [S-home] 'cider-repl-bol-mark)
-    (define-key map (kbd "C-<up>") 'cider-repl-backward-input)
-    (define-key map (kbd "C-<down>") 'cider-repl-forward-input)
-    (define-key map (kbd "M-p") 'cider-repl-previous-input)
-    (define-key map (kbd "M-n") 'cider-repl-next-input)
-    (define-key map (kbd "M-r") 'cider-repl-previous-matching-input)
-    (define-key map (kbd "M-s") 'cider-repl-next-matching-input)
-    (define-key map (kbd "C-c C-n") 'cider-repl-next-prompt)
-    (define-key map (kbd "C-c C-p") 'cider-repl-previous-prompt)
-    (define-key map (kbd "C-c C-b") 'cider-interrupt)
-    (define-key map (kbd "C-c C-c") 'cider-interrupt)
-    (define-key map (kbd "C-c C-m") 'cider-macroexpand-1)
-    (define-key map (kbd "C-c M-m") 'cider-macroexpand-all)
-    (define-key map (kbd "C-c C-z") 'cider-switch-to-last-clojure-buffer)
-    (define-key map (kbd "C-c M-s") 'cider-selector)
-    (define-key map (kbd "C-c C-q") 'cider-quit)
-    (define-key map (kbd "C-c M-i") 'cider-inspect)
-    (define-key map (kbd "C-c M-t v") 'cider-toggle-trace-var)
-    (define-key map (kbd "C-c M-t n") 'cider-toggle-trace-ns)
-    (define-key map (kbd "C-c C-x") 'cider-refresh)
-    (define-key map (kbd "C-x C-e") 'cider-eval-last-sexp)
-    (define-key map (kbd "C-c C-r") 'cider-eval-region)
-    (define-key map (string cider-repl-shortcut-dispatch-char) 'cider-repl-handle-shortcut)
+    (define-key map (kbd "M-,") #'cider-jump-back)
+    (define-key map (kbd "C-c M-.") #'cider-find-resource)
+    (define-key map (kbd "RET") #'cider-repl-return)
+    (define-key map (kbd "TAB") #'cider-repl-tab)
+    (define-key map (kbd "C-<return>") #'cider-repl-closing-return)
+    (define-key map (kbd "C-j") #'cider-repl-newline-and-indent)
+    (define-key map (kbd "C-c C-o") #'cider-repl-clear-output)
+    (define-key map (kbd "C-c M-o") #'cider-repl-clear-buffer)
+    (define-key map (kbd "C-c M-n") #'cider-repl-set-ns)
+    (define-key map (kbd "C-c C-u") #'cider-repl-kill-input)
+    (define-key map (kbd "C-S-a") #'cider-repl-bol-mark)
+    (define-key map [S-home] #'cider-repl-bol-mark)
+    (define-key map (kbd "C-<up>") #'cider-repl-backward-input)
+    (define-key map (kbd "C-<down>") #'cider-repl-forward-input)
+    (define-key map (kbd "M-p") #'cider-repl-previous-input)
+    (define-key map (kbd "M-n") #'cider-repl-next-input)
+    (define-key map (kbd "M-r") #'cider-repl-previous-matching-input)
+    (define-key map (kbd "M-s") #'cider-repl-next-matching-input)
+    (define-key map (kbd "C-c C-n") #'cider-repl-next-prompt)
+    (define-key map (kbd "C-c C-p") #'cider-repl-previous-prompt)
+    (define-key map (kbd "C-c C-b") #'cider-interrupt)
+    (define-key map (kbd "C-c C-c") #'cider-interrupt)
+    (define-key map (kbd "C-c C-m") #'cider-macroexpand-1)
+    (define-key map (kbd "C-c M-m") #'cider-macroexpand-all)
+    (define-key map (kbd "C-c C-z") #'cider-switch-to-last-clojure-buffer)
+    (define-key map (kbd "C-c M-s") #'cider-selector)
+    (define-key map (kbd "C-c C-q") #'cider-quit)
+    (define-key map (kbd "C-c M-i") #'cider-inspect)
+    (define-key map (kbd "C-c M-t v") #'cider-toggle-trace-var)
+    (define-key map (kbd "C-c M-t n") #'cider-toggle-trace-ns)
+    (define-key map (kbd "C-c C-x") #'cider-refresh)
+    (define-key map (kbd "C-x C-e") #'cider-eval-last-sexp)
+    (define-key map (kbd "C-c C-r") #'cider-eval-region)
+    (define-key map (string cider-repl-shortcut-dispatch-char) #'cider-repl-handle-shortcut)
     (easy-menu-define cider-repl-mode-menu map
       "Menu for CIDER's REPL mode"
       `("REPL"