diff options
| author | Spencer Baugh <sbaugh@janestreet.com> | 2024-08-07 11:18:02 -0400 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2024-08-07 19:52:36 +0300 |
| commit | 341e5795d5dbd49db330dda68c8d6040cc07ed63 (patch) | |
| tree | 01c2020a850e984ba7a3cf67182038eb4f9d4f1d /lisp/emacs-lisp | |
| parent | 3e30c779a7035fc99d6a787706bc04ff01868a66 (diff) | |
| download | emacs-341e5795d5dbd49db330dda68c8d6040cc07ed63.tar.gz emacs-341e5795d5dbd49db330dda68c8d6040cc07ed63.tar.bz2 emacs-341e5795d5dbd49db330dda68c8d6040cc07ed63.zip | |
Support minibuffer-visible-completions in completing-read-multiple
All that's required is to add minibuffer-visible-completions-map on
top of the completing-read-multiple map; this is the same thing that
minibuffer-visible-completions does in completing-read-default.
* lisp/emacs-lisp/crm.el (completing-read-multiple): Add
minibuffer-visible-completions-map (bug#69189)
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/crm.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el index 253dfc6237a..422a8d52dcf 100644 --- a/lisp/emacs-lisp/crm.el +++ b/lisp/emacs-lisp/crm.el @@ -238,6 +238,11 @@ with empty strings removed." (let* ((map (if require-match crm-local-must-match-map crm-local-completion-map)) + (map (if minibuffer-visible-completions + (make-composed-keymap + (list minibuffer-visible-completions-map + map)) + map)) input) (minibuffer-with-setup-hook (lambda () |