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).
This commit is contained in:
Dmitry Gutov 2024-05-05 19:42:05 +03:00
parent d5b6627faa
commit 696b1cb8de

View file

@ -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))