gitback/doomemacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

core-packages: revise load! prefer-el-p logistics

Browse Source
This commit is contained in:
Henrik Lissner 2017-02-02 21:56:08 -05:00
parent 2f8d00020f
commit 3654e0face
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
core/core-packages.el
View File

@ -210,9 +210,10 @@ Examples:
(load! +local-module)
Loads +local-module.el relative to `__DIR__' or `doom-core-dir'."
(let (path file)
(let ((prefer-el-p (or doom--prefer-el-p noninteractive))
path file)
(cond ((null submodule)
(setq path (or __DIR__ doom-core-dir)
(setq path __DIR__
file (concat (if (symbolp file-or-module-sym)
(symbol-name file-or-module-sym)
file-or-module-sym)
@ -224,8 +225,8 @@ Examples:
file (concat path file))
`(let ((__FILE__ ,file)
(__DIR__ ,path))
(load (if doom--prefer-el-p ,file ,(f-no-ext file))
nil (not doom-debug-mode) doom--prefer-el-p))))
(load ,(if doom--prefer-el-p file (f-no-ext file))
nil (not doom-debug-mode) ,doom--prefer-el-p))))
(defun doom-module-path (module submodule &optional file)
"Get the full path to a module: e.g. :lang emacs-lisp maps to