Polish narf/reload

This commit is contained in:
Henrik Lissner 2016-03-01 01:59:53 -05:00
parent 477ef168d4
commit ad5d4171fa

View file

@ -47,19 +47,19 @@
(dolist (file paths) (dolist (file paths)
(when (file-directory-p file) (when (file-directory-p file)
(push file result))) (push file result)))
result))) result))
(defvar narf--load-path load-path) (defvar narf--load-path load-path)
(defun narf/reload () (defun narf/reload ()
(interactive) (interactive)
(setq load-path (setq load-path
(progn (require 'cask) (progn (require 'cask)
(cask-initialize) (cask-initialize)
(append (list narf-private-dir) (append (list narf-private-dir)
(--subdirs narf-core-dir t) (--subdirs narf-core-dir t)
(--subdirs narf-modules-dir t) (--subdirs narf-modules-dir t)
(--subdirs narf-packages-dir) (--subdirs narf-packages-dir)
narf--load-path)))) narf--load-path)))))
(defun narf (packages) (defun narf (packages)
"Bootstrap NARF emacs and initialize PACKAGES" "Bootstrap NARF emacs and initialize PACKAGES"