From 4695155611ff9ff1a5954f7760931d5f971fa7c7 Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Fri, 1 Nov 2024 02:32:10 +0200 Subject: [PATCH] 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 94a9e40e82d4180563d7bddfa0cc6c8990824f8d) --- test/lisp/progmodes/project-tests.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/test/lisp/progmodes/project-tests.el b/test/lisp/progmodes/project-tests.el index 402bde4e03b..8ed6225e32f 100644 --- a/test/lisp/progmodes/project-tests.el +++ b/test/lisp/progmodes/project-tests.el @@ -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." -- 2.39.5