mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 09:14:18 +00:00
When crafting "override" regexp for new flex style
* lisp/minibuffer.el (completion-substring--all-completions): Fix.
This commit is contained in:
parent
8279a9b6a1
commit
54caeafb1d
1 changed files with 3 additions and 2 deletions
|
|
@ -4909,10 +4909,11 @@ SIMPLE-RE is means to pass a simpler faster regular expression to
|
|||
(funcall transform-pattern-fn pattern)
|
||||
pattern)))
|
||||
(override-re (and simple-re
|
||||
(mapconcat #'identity
|
||||
(mapconcat #'regexp-quote
|
||||
(split-string
|
||||
(substring string (car bounds)
|
||||
(+ point (cdr bounds))) "" t)
|
||||
(+ point (cdr bounds)))
|
||||
"" t)
|
||||
".*")))
|
||||
(all (completion-pcm--all-completions prefix pattern table pred override-re)))
|
||||
(list all pattern prefix suffix (car bounds))))
|
||||
|
|
|
|||
Loading…
Reference in a new issue