From: Michael Albinus <michael.albinus@gmx.de>
Date: Sat, 19 Aug 2023 08:11:32 +0000 (+0200)
Subject: Adapt test in minibuffer-tests.el
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cd3f163005ef9e5ad73fb8609e8199d86b9ce865;p=emacs.git

Adapt test in minibuffer-tests.el

* test/lisp/minibuffer-tests.el (test-completion-all-sorted-completions):
Simplify function declaration.
---

diff --git a/test/lisp/minibuffer-tests.el b/test/lisp/minibuffer-tests.el
index a67fc555772..ff58d35eb3e 100644
--- a/test/lisp/minibuffer-tests.el
+++ b/test/lisp/minibuffer-tests.el
@@ -139,7 +139,7 @@
 (defun test-completion-all-sorted-completions (base def history-var history-list)
   (with-temp-buffer
     (insert base)
-    (cl-letf (((symbol-function #'minibufferp) (lambda (&rest _) t)))
+    (cl-letf (((symbol-function #'minibufferp) #'always))
       (let ((completion-styles '(basic))
             (completion-category-defaults nil)
             (completion-category-overrides nil)