* lisp/minibuffer.el (completion-table-subvert): Fix typo from rev 5697ca55cb
This commit is contained in:
parent
65b395d7cc
commit
78c9c2a110
1 changed files with 1 additions and 1 deletions
|
@ -269,7 +269,7 @@ the form (concat S2 S)."
|
|||
(+ beg (- (length s1) (length s2))))
|
||||
. ,(and (eq (car-safe res) 'boundaries) (cddr res)))))
|
||||
((stringp res)
|
||||
(if (string-prefix-p s2 string completion-ignore-case)
|
||||
(if (string-prefix-p s2 res completion-ignore-case)
|
||||
(concat s1 (substring res (length s2)))))
|
||||
((eq action t)
|
||||
(let ((bounds (completion-boundaries str table pred "")))
|
||||
|
|
Loading…
Add table
Reference in a new issue