summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBozhidar Batsov <bozhidar@batsov.com>2015-05-03 13:10:56 +0300
committerBozhidar Batsov <bozhidar@batsov.com>2015-05-03 13:10:56 +0300
commitc03a988b4b040be47297ab46b72cd45d48258e39 (patch)
treeec47f1412a30fe7d917368fd03fe673792d9d14c
parent6e0a4eed07105ebf99687a051272e0150abdf7cd (diff)
Use #' where appropriate
-rw-r--r--cider-repl.el72
1 files changed, 36 insertions, 36 deletions
diff --git a/cider-repl.el b/cider-repl.el
index 9c4ddc9c..6e2982ba 100644
--- a/cider-repl.el
+++ b/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"