fix(project): correctly check if project root is a directory

abougouffa · Nov 14, 2023 · 7b31d73 · 7b31d73
1 parent 6b6ef59
commit 7b31d73
Showing 1 changed file with 3 additions and 4 deletions.
diff --git a/elisp/+project.el b/elisp/+project.el
@@ -27,10 +27,9 @@ to scan directories recursively."
     (let* ((cons-dir (ensure-list cons-dir))
            (root-dir (car cons-dir))
            (recursive (cdr cons-dir))
-           (sub-dirs (+directory-subdirs root-dir)))
-      (dolist (dir sub-dirs)
-        (when (file-directory-p dir)
-          (project-remember-projects-under dir recursive))))))
+           (sub-dirs (and (file-directory-p root-dir) (+directory-subdirs root-dir))))
+        (dolist (dir sub-dirs)
+          (project-remember-projects-under dir recursive)))))
 
 ;;;###autoload
 (defun +project-add-project (dir &optional dont-ask)