completing-read-multiple: Fix support for ":" as separator
* lisp/emacs-lisp/crm.el (completing-read-multiple): Do not search for separators inside the prompt (bug#76461).
This commit is contained in:
parent
38cc36a375
commit
8091772767
1 changed files with 3 additions and 1 deletions
|
@ -253,7 +253,9 @@ with empty strings removed."
|
||||||
(setq-local completion-list-insert-choice-function
|
(setq-local completion-list-insert-choice-function
|
||||||
(lambda (_start _end choice)
|
(lambda (_start _end choice)
|
||||||
(let* ((beg (save-excursion
|
(let* ((beg (save-excursion
|
||||||
(if (search-backward-regexp crm-separator nil t)
|
(if (search-backward-regexp crm-separator
|
||||||
|
(field-beginning)
|
||||||
|
t)
|
||||||
(1+ (point))
|
(1+ (point))
|
||||||
(minibuffer-prompt-end))))
|
(minibuffer-prompt-end))))
|
||||||
(end (save-excursion
|
(end (save-excursion
|
||||||
|
|
Loading…
Add table
Reference in a new issue