project-tests: Add test assertion for bug#73801

* test/lisp/progmodes/project-tests.el
(project-vc-extra-root-markers-supports-wildcards): End with a
check that we didn't cache a wrong value for parent (bug#73801).

(cherry picked from commit 94a9e40e82)
This commit is contained in:
Dmitry Gutov 2024-11-01 02:32:10 +02:00
parent b4b0d5a853
commit 0f9d48e99c

View file

@ -138,7 +138,11 @@ When `project-ignores' includes a name matching project dir."
(project (project-current nil dir)))
(should-not (null project))
(should (nth 1 project))
(should (string-match-p "/test/lisp/\\'" (project-root project)))))
(should (string-match-p "/test/lisp/\\'" (project-root project)))
;; bug#73801
(should (equal
project
(project-current nil (project-root project))))))
(ert-deftest project-vc-supports-project-in-different-dir ()
"Check that it picks up dir-locals settings from somewhere else."