From: Eshel Yaron <me@eshelyaron.com>
Date: Thu, 13 Jun 2024 14:43:41 +0000 (+0200)
Subject: ; (completion-basic-all-completions): Fix recent change
X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~2^2~20^2~1047
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=56537ab0228262e96bf75f351642d8aaaa8097f7;p=emacs.git

; (completion-basic-all-completions): Fix recent change

* lisp/minibuffer.el (completion-basic-all-completions): Don't
omit base size.

https://lists.gnu.org/archive/html/emacs-devel/2024-06/msg00235.html
---

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