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)
|
(funcall transform-pattern-fn pattern)
|
||||||
pattern)))
|
pattern)))
|
||||||
(override-re (and simple-re
|
(override-re (and simple-re
|
||||||
(mapconcat #'identity
|
(mapconcat #'regexp-quote
|
||||||
(split-string
|
(split-string
|
||||||
(substring string (car bounds)
|
(substring string (car bounds)
|
||||||
(+ point (cdr bounds))) "" t)
|
(+ point (cdr bounds)))
|
||||||
|
"" t)
|
||||||
".*")))
|
".*")))
|
||||||
(all (completion-pcm--all-completions prefix pattern table pred override-re)))
|
(all (completion-pcm--all-completions prefix pattern table pred override-re)))
|
||||||
(list all pattern prefix suffix (car bounds))))
|
(list all pattern prefix suffix (car bounds))))
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue