emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

doom--module-pairs => doom-module-pairs

Browse source
This commit is contained in:
Henrik Lissner 2017-11-08 22:45:52 +01:00
parent f65b6fcddd
commit 211977e28a
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
4 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

8
core/core-packages.el
View file

@ -213,13 +213,13 @@ This aggressively reloads core autoload files."
(let (noninteractive)
(funcall load-fn (doom-module-path :private user-login-name "init.el") t))
(mapc load-fn (file-expand-wildcards (expand-file-name "autoload/*.el" doom-core-dir)))
(cl-loop for (module . submodule) in (doom--module-pairs)
(cl-loop for (module . submodule) in (doom-module-pairs)
for path = (doom-module-path module submodule "config.el")
do (funcall load-fn path t))))
(when (or force-p (not doom-packages))
(setq doom-packages nil)
(funcall load-fn (expand-file-name "packages.el" doom-core-dir))
(cl-loop for (module . submodule) in (doom--module-pairs)
(cl-loop for (module . submodule) in (doom-module-pairs)
for path = (doom-module-path module submodule "packages.el")
do (funcall load-fn path t)))))
(doom|finalize))
@ -274,7 +274,7 @@ Used by `require!' and `depends-on!'."
(doom-enlist (or flags t))
doom-modules))
(defun doom--module-pairs ()
(defun doom-module-pairs ()
"Returns `doom-modules' as a list of (MODULE . SUBMODULE) cons cells. The list
is sorted by order of insertion unless ALL-P is non-nil. If ALL-P is non-nil,
include all modules, enabled or otherwise."
@ -320,7 +320,7 @@ MODULES is an malformed plist of modules to load."
(unless noninteractive
(load ,(doom-module-path :private user-login-name "init") t t)
,@(cl-loop for (module . submodule) in (doom--module-pairs)
,@(cl-loop for (module . submodule) in (doom-module-pairs)
collect `(require! ,module ,submodule nil t))
(when (display-graphic-p)