Backport https://git.savannah.gnu.org/cgit/emacs.git/commit/?id=6b7ff60a5e7

Signed-off-by: Nathan Farlow <[email protected]>

Author: nfarlow-js

lisp/minibuffer.el

@@ -3827,7 +3827,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.