From 25aa737b476e989dd5741c59517d187dc37ee80a Mon Sep 17 00:00:00 2001
From: Nathan Farlow <nfarlow@janestreet.com>
Date: Mon, 22 Jul 2024 10:01:56 -0400
Subject: [PATCH] Backport
 https://git.savannah.gnu.org/cgit/emacs.git/commit/?id=6b7ff60a5e7

Signed-off-by: Nathan Farlow <nfarlow@janestreet.com>
---
 lisp/minibuffer.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index ad6a0928cda6..f4a295106b5e 100644
--- a/lisp/minibuffer.el
+++ b/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.