From: João Távora <joaotavora@gmail.com>
Date: Tue, 24 Nov 2020 23:15:40 +0000 (+0000)
Subject: Make a completion test robust to custom completion styles
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d333ec4cabd21244e5ee468b3a7475fa2dcbe614;p=emacs.git

Make a completion test robust to custom completion styles

* test/lisp/minibuffer-tests.el (completion-test1): Make test
resilient to more completion styles.
---

diff --git a/test/lisp/minibuffer-tests.el b/test/lisp/minibuffer-tests.el
index 5988656bd7f..d665587ba26 100644
--- a/test/lisp/minibuffer-tests.el
+++ b/test/lisp/minibuffer-tests.el
@@ -41,7 +41,8 @@
                                          (list (copy-marker (point-min))
                                                (copy-marker (point))
                                                #'test/completion-table)))
-      (let ((completion-at-point-functions (list #'test/completion-at-point)))
+      (let ((completion-styles '(basic))
+            (completion-at-point-functions (list #'test/completion-at-point)))
         (insert "TEST")
         (completion-at-point)
         (should (equal (buffer-string)