Add function spacemacs/declare-configuration-layers

This commit is contained in:
syl20bnr 2014-09-04 23:43:50 -04:00
parent be19f4ac08
commit d0a86ba012
2 changed files with 8 additions and 2 deletions

View File

@ -123,3 +123,10 @@ extension.
(init-func (intern (format "%s/init-%s" (symbol-name lsym) ext))))
(add-to-list 'load-path (format "%s%s/" ext-dir ext))
(if (fboundp init-func) (funcall init-func))))
(defun spacemacs/declare-configuration-layers ()
"Declare the configuration layer in order of appearance in list
dotspacemacs-configuration-layers defined in ~/.spacemacs."
(if (boundp 'dotspacemacs-configuration-layers)
(dolist (layer dotspacemacs-configuration-layers)
(spacemacs/declare-layer layer t))))

View File

@ -21,8 +21,7 @@
(load (concat user-emacs-directory "contribsys.el"))
(spacemacs/declare-layer 'spacemacs)
;; for now hardcoded contrib config layers
(spacemacs/declare-layer 'syl20bnr t)
(spacemacs/declare-configuration-layers)
(spacemacs/load-layers)
;; Last configuration decisions are given to the user who can defined them