emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 298f25e: * lisp/minibuffer.el (minibuffer-mode-map): Make it an a


From: Stefan Monnier
Subject: master 298f25e: * lisp/minibuffer.el (minibuffer-mode-map): Make it an alias
Date: Tue, 20 Apr 2021 09:37:56 -0400 (EDT)

branch: master
commit 298f25ee1da1f3ac3057444137273b6380b1c8f8
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * lisp/minibuffer.el (minibuffer-mode-map): Make it an alias
    
    Avoid creating this "dummy" keymap by making it an alias of
    the parent keymap of all minibuffer keymaps.
---
 lisp/minibuffer.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index 9bbc22b..55af95a 100644
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -489,12 +489,12 @@ for use at QPOS."
              (ufull (if (zerop (length qsuffix)) ustring
                       (funcall unquote (concat string qsuffix))))
              ;; If (not (string-prefix-p ustring ufull)) we have a problem:
-             ;; the unquoting the qfull gives something "unrelated" to ustring.
+             ;; unquoting the qfull gives something "unrelated" to ustring.
              ;; E.g. "~/" and "/" where "~//" gets unquoted to just "/" (see
              ;; bug#47678).
              ;; In that case we can't even tell if we're right before the
              ;; "/" or right after it (aka if this "/" is from qstring or
-             ;; from qsuffix), which which usuffix to use is very unclear.
+             ;; from qsuffix), thus which usuffix to use is very unclear.
              (usuffix (if (string-prefix-p ustring ufull)
                           (substring ufull (length ustring))
                         ;; FIXME: Maybe "" is preferable/safer?
@@ -2499,6 +2499,8 @@ not active.")
   "Major mode to use in the minibuffer when it is not active.
 This is only used when the minibuffer area has no active minibuffer.")
 
+(defvaralias 'minibuffer-mode-map 'minibuffer-local-map)
+
 (define-derived-mode minibuffer-mode nil "Minibuffer"
   "Major mode used for active minibuffers.
 



reply via email to

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