Do not treat dotfiles as projects

2 years ago · 57044376be
1 changed files with 2 additions and 1 deletions
--- a/site-lisp/db-projects.el
+++ b/site-lisp/db-projects.el
@ -49,7 +49,8 @@
 (defun projects-existing-projects ()
  "Return list of all short-names of existing projects."
  (cl-remove-if-not #'projects-project-exists-p
-                    (directory-files projects-main-project-directory)))
+                    (directory-files projects-main-project-directory
+                                     nil "^[^.]")))

 ;;;###autoload
 (defun projects-add-project (short-name long-name)