diff options
| author | Dmitry Gutov | 2024-05-05 19:42:05 +0300 |
|---|---|---|
| committer | Dmitry Gutov | 2024-05-05 19:43:06 +0300 |
| commit | 696b1cb8de2cbd808d572edbd3beca4813af3514 (patch) | |
| tree | 0aa5246820adafdfef22da23f954e8893b380c1f /test | |
| parent | d5b6627faa9bbd0059600a91d1cd45c0b31e3cd8 (diff) | |
| download | emacs-696b1cb8de2cbd808d572edbd3beca4813af3514.tar.gz emacs-696b1cb8de2cbd808d572edbd3beca4813af3514.zip | |
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).
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/progmodes/project-tests.el | 1 |
1 files changed, 1 insertions, 0 deletions
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." | |||
| 170 | (skip-unless (executable-find "grep")) | 170 | (skip-unless (executable-find "grep")) |
| 171 | (let* ((directory (ert-resource-directory)) | 171 | (let* ((directory (ert-resource-directory)) |
| 172 | (project-find-functions nil) | 172 | (project-find-functions nil) |
| 173 | (project-list-file (expand-file-name "emacs-projects" temporary-file-directory)) | ||
| 173 | (project (cons 'transient directory))) | 174 | (project (cons 'transient directory))) |
| 174 | (add-hook 'project-find-functions (lambda (_dir) project)) | 175 | (add-hook 'project-find-functions (lambda (_dir) project)) |
| 175 | (should (eq (project-current) project)) | 176 | (should (eq (project-current) project)) |