]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/minibuffer.el (minibuffer-mode-map): Make it an alias
authorStefan Monnier <monnier@iro.umontreal.ca>
Tue, 20 Apr 2021 13:36:26 +0000 (09:36 -0400)
committerStefan Monnier <monnier@iro.umontreal.ca>
Tue, 20 Apr 2021 13:36:26 +0000 (09:36 -0400)
Avoid creating this "dummy" keymap by making it an alias of
the parent keymap of all minibuffer keymaps.

lisp/minibuffer.el

index 9bbc22b6ea053ef5329d7fe0184196e2a7adbfc3..55af95a9604e6a4b375202c93d64fa3d40a8d63a 100644 (file)
@@ -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.