diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index f62cb2566b2..144cda8cfdc 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -3816,7 +3816,7 @@ Return the new suffix." 'point (substring afterpoint 0 (cdr bounds))))) (all (completion-pcm--all-completions prefix pattern table pred))) - (completion-hilit-commonality all point (car bounds)))) + (completion-pcm--hilit-commonality pattern all))) ;;; Partial-completion-mode style completion.