emacs-diffs
[Top][All Lists]
Advanced

[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.")
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]