From 4855e6efd2d972e3dd1502d4c7c34b10ca16c35b Mon Sep 17 00:00:00 2001 From: Doug MacEachern Date: Wed, 30 Apr 2014 16:48:26 -0700 Subject: [PATCH] Filter all hidden directories when adding to load-path prelude-add-subfolders-to-load-path currently recurses into ".git" directories for example. Seems reasonable to skip any "hidden" directory prefixed with a "." --- init.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/init.el b/init.el index 72a14f3..713a355 100644 --- a/init.el +++ b/init.el @@ -73,8 +73,7 @@ by Prelude.") (dolist (f (directory-files parent-dir)) (let ((name (expand-file-name f parent-dir))) (when (and (file-directory-p name) - (not (equal f "..")) - (not (equal f "."))) + (not (string-prefix-p "." f))) (add-to-list 'load-path name) (prelude-add-subfolders-to-load-path name)))))