diff options
| author | Jacob First <jacob.first@member.fsf.org> | 2020-05-23 15:42:19 -0400 |
|---|---|---|
| committer | Bozhidar Batsov <bozhidar.batsov@gmail.com> | 2020-06-15 23:18:06 +0300 |
| commit | 10bd27d723764c39336ccb4d1e205b1c767ba4d9 (patch) | |
| tree | 54bfce6fbd81338d1df32d61b73667642eb6b45c /test | |
| parent | d882b10322a2f0e2b673fa228f2468eef0ea7977 (diff) | |
Add a custom setting to control automatic project discovery
Diffstat (limited to 'test')
| -rw-r--r-- | test/projectile-test.el | 17 |
1 files changed, 14 insertions, 3 deletions
diff --git a/test/projectile-test.el b/test/projectile-test.el index bc9a5d6..6cafe79 100644 --- a/test/projectile-test.el +++ b/test/projectile-test.el @@ -310,13 +310,24 @@ You'd normally combine this with `projectile-test-with-sandbox'." (expect (projectile-files-via-ext-command "" nil) :not :to-be-truthy))) (describe "projectile-mode" - (it "sets up hook functions" + (before-each (spy-on 'projectile--cleanup-known-projects) - (spy-on 'projectile-discover-projects-in-search-path) + (spy-on 'projectile-discover-projects-in-search-path)) + (it "sets up hook functions" (projectile-mode 1) (expect (memq 'projectile-find-file-hook-function find-file-hook) :to-be-truthy) (projectile-mode -1) - (expect (memq 'projectile-find-file-hook-function find-file-hook) :not :to-be-truthy))) + (expect (memq 'projectile-find-file-hook-function find-file-hook) :not :to-be-truthy)) + (it "respects projectile-auto-discover setting" + (unwind-protect + (progn + (let ((projectile-auto-discover nil)) + (projectile-mode 1) + (expect 'projectile-discover-projects-in-search-path :not :to-have-been-called)) + (let ((projectile-auto-discover t)) + (projectile-mode 1) + (expect 'projectile-discover-projects-in-search-path :to-have-been-called))) + (projectile-mode -1)))) (describe "projectile-relevant-known-projects" (it "returns a list of known projects" |