From 09635ea8704e920d31ec02b14435815584eb6d0a Mon Sep 17 00:00:00 2001 From: Bozhidar Batsov Date: Mon, 2 Sep 2013 18:38:04 +0300 Subject: [PATCH] [Fix #378] Add folders recursively to the load-path in prelude-add-subfolders-to-load-path --- init.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/init.el b/init.el index b87a03c..fab720b 100644 --- a/init.el +++ b/init.el @@ -61,13 +61,14 @@ by Prelude.") (make-directory prelude-savefile-dir)) (defun prelude-add-subfolders-to-load-path (parent-dir) - "Add all first level PARENT-DIR subdirs to the `load-path'." + "Add all level PARENT-DIR subdirs to the `load-path'." (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 "."))) - (add-to-list 'load-path name))))) + (add-to-list 'load-path name) + (prelude-add-subfolders-to-load-path name))))) ;; add Prelude's directories to Emacs's `load-path' (add-to-list 'load-path prelude-core-dir)