branch: elpa/projectile
commit 86724c53bdb0d97d2a0af99373a7bc61c43abc57
Author: Bozhidar Batsov <[email protected]>
Commit: Bozhidar Batsov <[email protected]>
Minor cleanup of the #1897 fix
- Use cl-remove-if instead of seq-remove for consistency with the rest
of the codebase.
- Remove unnecessary project/.git/ from test fixture (git init creates it).
- Remove unnecessary projectile-indexing-method binding in test.
---
projectile.el | 2 +-
test/projectile-test.el | 4 +---
2 files changed, 2 insertions(+), 4 deletions(-)
diff --git a/projectile.el b/projectile.el
index 574c5bd9b8..1f520807b5 100644
--- a/projectile.el
+++ b/projectile.el
@@ -1546,7 +1546,7 @@ IGNORED-DIRECTORIES may optionally be provided."
(deleted (unless (and projectile-git-use-fd
projectile-fd-executable)
(projectile-git-deleted-files directory))))
(if deleted
- (seq-remove (lambda (f) (member f deleted)) files)
+ (cl-remove-if (lambda (f) (member f deleted)) files)
files)))
(t (projectile-files-via-ext-command directory
(projectile-get-ext-command vcs))))))
diff --git a/test/projectile-test.el b/test/projectile-test.el
index 25c96f1b97..7864c091eb 100644
--- a/test/projectile-test.el
+++ b/test/projectile-test.el
@@ -537,12 +537,10 @@ Just delegates OPERATION and ARGS for all operations
except for`shell-command`'.
(projectile-test-with-sandbox
(projectile-test-with-files
("project/"
- "project/.git/"
"project/existing.txt")
(let ((default-directory (file-truename (expand-file-name "project/")))
(projectile-git-use-fd nil)
- (projectile-fd-executable nil)
- (projectile-indexing-method 'alien))
+ (projectile-fd-executable nil))
;; Initialize a real git repo, commit a file, then delete it without
staging
(call-process "git" nil nil nil "init")
(call-process "git" nil nil nil "config" "user.email" "[email protected]")
