From: Dmitry Gutov <dmitry@gutov.dev>
Date: Sun, 5 May 2024 16:42:05 +0000 (+0300)
Subject: project-find-regexp: Fix test
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c80a1bc6eebe4368fd9238e2f8435e9ca620625c;p=emacs.git

project-find-regexp: Fix test

* test/lisp/progmodes/project-tests.el (project-find-regexp):
Add binding for project-list-file, to fix the test when running
in the terminal (reported on the mailing list).

(cherry picked from commit 696b1cb8de2cbd808d572edbd3beca4813af3514)
---

diff --git a/test/lisp/progmodes/project-tests.el b/test/lisp/progmodes/project-tests.el
index 84a5d55f136..21703cbdad6 100644
--- a/test/lisp/progmodes/project-tests.el
+++ b/test/lisp/progmodes/project-tests.el
@@ -170,6 +170,7 @@ When `project-ignores' includes a name matching project dir."
   (skip-unless (executable-find "grep"))
   (let* ((directory (ert-resource-directory))
          (project-find-functions nil)
+         (project-list-file (expand-file-name "emacs-projects" temporary-file-directory))
          (project (cons 'transient directory)))
     (add-hook 'project-find-functions (lambda (_dir) project))
     (should (eq (project-current) project))