[elpa] externals/denote dd488756f7 019/355: Refine denote--directory-files

[ELPA Syncer]

branch: externals/denote
commit dd488756f704e2e38891d51d3a21bc51982a5350
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Refine denote--directory-files
---
 denote.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/denote.el b/denote.el
index 72904f2a9e..bcd1c0f738 100644
--- a/denote.el
+++ b/denote.el
@@ -155,12 +155,12 @@ trailing hyphen."
 
 (defun denote--directory-files ()
   "List `denote-directory' files, assuming flat directory."
-  (seq-remove
-   (lambda (file)
-     ;; TODO: generalise this for more VC backends?  Which ones?
-     (or (string-match-p "\\.git" file)
-         (file-directory-p file)))
-   (directory-files (denote--directory) nil 
directory-files-no-dot-files-regexp t)))
+  (let* ((dir (denote--directory))
+        (default-directory dir))
+    (seq-remove
+     (lambda (file)
+       (file-directory-p file))
+     (directory-files dir nil directory-files-no-dot-files-regexp t))))
 
 (defun denote--keywords-in-files ()
   "Produce list of keywords in `denote--directory-files'."