[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 3c57867df4: lisp/simple.el: Use #' in new code
From: |
Stefan Monnier |
Subject: |
master 3c57867df4: lisp/simple.el: Use #' in new code |
Date: |
Thu, 7 Apr 2022 19:21:04 -0400 (EDT) |
branch: master
commit 3c57867df49314df47178e9e8a8754689c6753b1
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
lisp/simple.el: Use #' in new code
* lisp/simple.el (minibuffer-local-shell-command-map): Use #' to quote
function names.
---
lisp/simple.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/lisp/simple.el b/lisp/simple.el
index 80c27d6e0e..eb65701803 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3923,12 +3923,12 @@ to the end of the list of defaults just after the
default value."
(defvar minibuffer-local-shell-command-map
(let ((map (make-sparse-keymap)))
(set-keymap-parent map minibuffer-local-map)
- (define-key map "\t" 'completion-at-point)
- (define-key map [M-up] 'minibuffer-choose-previous-completion)
- (define-key map [M-down] 'minibuffer-choose-next-completion)
- (define-key map [M-S-up] 'minibuffer-previous-completion)
- (define-key map [M-S-down] 'minibuffer-next-completion)
- (define-key map [?\M-\r] 'minibuffer-choose-completion)
+ (define-key map "\t" #'completion-at-point)
+ (define-key map [M-up] #'minibuffer-choose-previous-completion)
+ (define-key map [M-down] #'minibuffer-choose-next-completion)
+ (define-key map [M-S-up] #'minibuffer-previous-completion)
+ (define-key map [M-S-down] #'minibuffer-next-completion)
+ (define-key map [?\M-\r] #'minibuffer-choose-completion)
map)
"Keymap used for completing shell commands in minibuffer.")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 3c57867df4: lisp/simple.el: Use #' in new code,
Stefan Monnier <=