mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-05 22:20:24 -08:00
(completing-read-multiple): Set missing buffer-local variables
* lisp/emacs-lisp/crm.el (completing-read-multiple): Set missing buffer-local variables `minibuffer--require-match` and `minibuffer--original-buffer`, which are set by `completing-read` in the minibuffer setup hook. (bug#79110)
This commit is contained in:
parent
0c77c5edfd
commit
84f1080f67
1 changed files with 3 additions and 0 deletions
|
|
@ -259,6 +259,7 @@ with empty strings removed."
|
|||
(list minibuffer-visible-completions-map
|
||||
map))
|
||||
map))
|
||||
(buffer (current-buffer))
|
||||
input)
|
||||
(minibuffer-with-setup-hook
|
||||
(lambda ()
|
||||
|
|
@ -282,6 +283,8 @@ with empty strings removed."
|
|||
;; see completing_read in src/minibuf.c
|
||||
(setq-local minibuffer-completion-confirm
|
||||
(unless (eq require-match t) require-match))
|
||||
(setq-local minibuffer--require-match require-match)
|
||||
(setq-local minibuffer--original-buffer buffer)
|
||||
(setq-local crm-completion-table table))
|
||||
(setq input (read-from-minibuffer
|
||||
(format-spec
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue