From 78c9c2a110aa94e82c90549c81e8911a006ee538 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 20 Mar 2019 09:58:28 -0400 Subject: [PATCH] * lisp/minibuffer.el (completion-table-subvert): Fix typo from rev 5697ca55cb --- lisp/minibuffer.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index df0acbb343d..dbd24dfa0a3 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -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 ""))) -- 2.39.5