Wrap load-path bootstrap into function: narf/reload
This commit is contained in:
parent
bfc47f61b7
commit
a7ca45bca5
1 changed files with 17 additions and 15 deletions
32
bootstrap.el
32
bootstrap.el
|
@ -49,20 +49,22 @@
|
||||||
result)))
|
result)))
|
||||||
|
|
||||||
;; Scan various folders to populate the load-paths
|
;; Scan various folders to populate the load-paths
|
||||||
(setq custom-theme-load-path
|
(defun narf/reload ()
|
||||||
(eval-when-compile
|
(interactive)
|
||||||
(append (--subdirs (concat narf-private-dir "themes/"))
|
(setq custom-theme-load-path
|
||||||
custom-theme-load-path)))
|
(eval-when-compile
|
||||||
|
(append (--subdirs (concat narf-private-dir "themes/"))
|
||||||
(setq load-path
|
custom-theme-load-path)))
|
||||||
(eval-when-compile
|
(setq load-path
|
||||||
(require 'cask)
|
(eval-when-compile
|
||||||
(cask-initialize)
|
(require 'cask)
|
||||||
(setq load-path (append (list narf-private-dir)
|
(cask-initialize)
|
||||||
(--subdirs narf-core-dir t)
|
(setq load-path (append (list narf-private-dir)
|
||||||
(--subdirs narf-modules-dir t)
|
(--subdirs narf-core-dir t)
|
||||||
(--subdirs narf-packages-dir)
|
(--subdirs narf-modules-dir t)
|
||||||
load-path))))
|
(--subdirs narf-packages-dir)
|
||||||
|
load-path)))))
|
||||||
|
(narf/reload)
|
||||||
|
|
||||||
(defun narf (packages)
|
(defun narf (packages)
|
||||||
"Bootstrap NARF emacs and initialize PACKAGES"
|
"Bootstrap NARF emacs and initialize PACKAGES"
|
||||||
|
@ -75,7 +77,7 @@
|
||||||
|
|
||||||
(load-theme narf-theme t)
|
(load-theme narf-theme t)
|
||||||
(setq narf-current-theme narf-theme)
|
(setq narf-current-theme narf-theme)
|
||||||
|
|
||||||
(mapc 'require packages)))
|
(mapc 'require packages)))
|
||||||
|
|
||||||
;;; bootstrap.el ends here
|
;;; bootstrap.el ends here
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue