diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/projectile-test.el | 18 |
1 files changed, 17 insertions, 1 deletions
diff --git a/test/projectile-test.el b/test/projectile-test.el index 4faf8ae..b62224a 100644 --- a/test/projectile-test.el +++ b/test/projectile-test.el @@ -746,7 +746,23 @@ Just delegates OPERATION and ARGS for all operations except for`shell-command`'. (projectile-parse-dirconfig-file) (expect (gethash root projectile--dirconfig-cache) :not :to-be nil) (projectile-invalidate-cache nil) - (expect (gethash root projectile--dirconfig-cache) :to-be nil)))))) + (expect (gethash root projectile--dirconfig-cache) :to-be nil))))) + (it "re-parses when projectile-dirconfig-file points to a different file" + (projectile-test-with-sandbox + (projectile-test-with-files + ("project/") + (let ((root (file-truename (expand-file-name "project/")))) + (with-temp-file (expand-file-name ".projectile" root) + (insert "-foo\n")) + (with-temp-file (expand-file-name ".projectile-alt" root) + (insert "-bar\n")) + (spy-on 'projectile-project-root :and-return-value root) + (let ((projectile-dirconfig-file ".projectile")) + (expect (projectile-dirconfig-ignore (projectile-parse-dirconfig-file)) + :to-equal '("foo"))) + (let ((projectile-dirconfig-file ".projectile-alt")) + (expect (projectile-dirconfig-ignore (projectile-parse-dirconfig-file)) + :to-equal '("bar")))))))) (describe "prefix-less dirconfig warning" (before-each |