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

Use -- to delimit arguments

Browse source
This commit is contained in:
Henrik Lissner 2017-11-07 13:08:19 +01:00
parent 936e3d8dcb
commit 2516a123d6
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Makefile
View file

@ -45,10 +45,10 @@ compile-elpa: init.el
@$(EMACS) -f doom//byte-recompile-plugins @$(EMACS) -f doom//byte-recompile-plugins
$(patsubst %, compile-%, $(MODULES)): init.el .local/autoloads.el $(patsubst %, compile-%, $(MODULES)): init.el .local/autoloads.el
@$(EMACS) -f doom//byte-compile $(patsubst compile-%, %, $@) @$(EMACS) -f doom//byte-compile -- $(patsubst compile-%, %, $@)
recompile: init.el recompile: init.el
@$(EMACS) -f doom//byte-compile -r @$(EMACS) -f doom//byte-compile -- -r
clean: clean:
@$(EMACS) -f doom//clean-byte-compiled-files @$(EMACS) -f doom//clean-byte-compiled-files

6
core/core-packages.el
View file

@ -599,7 +599,7 @@ If RECOMPILE-P is non-nil, only recompile out-of-date files."
(list nil current-prefix-arg)) (list nil current-prefix-arg))
(let ((default-directory doom-emacs-dir) (let ((default-directory doom-emacs-dir)
(recompile-p (or recompile-p (recompile-p (or recompile-p
(and (member "-r" command-line-args) t)))) (and (member "-r" (cdr argv)) t))))
(if (not noninteractive) (if (not noninteractive)
(let ((compilation-filter-hook (let ((compilation-filter-hook
(list (lambda () (ansi-color-apply-on-region compilation-filter-start (point)))))) (list (lambda () (ansi-color-apply-on-region compilation-filter-start (point))))))
@ -610,7 +610,7 @@ If RECOMPILE-P is non-nil, only recompile out-of-date files."
(let ((total-ok 0) (let ((total-ok 0)
(total-fail 0) (total-fail 0)
(total-noop 0) (total-noop 0)
(modules (or modules command-line-args-left)) (modules (or modules (cdr argv)))
compile-targets) compile-targets)
(doom-initialize-packages t t) (doom-initialize-packages t t)
(setq compile-targets (setq compile-targets
@ -624,7 +624,7 @@ If RECOMPILE-P is non-nil, only recompile out-of-date files."
nconc (nreverse (directory-files-recursively (expand-file-name target doom-modules-dir) "\\.el$")) nconc (nreverse (directory-files-recursively (expand-file-name target doom-modules-dir) "\\.el$"))
else if (file-exists-p target) else if (file-exists-p target)
collect target collect target
finally do (setq command-line-args-left nil))) finally do (setq argv nil)))
(unless compile-targets (unless compile-targets
(error "No targets to compile")) (error "No targets to compile"))
(let ((use-package-expand-minimally t)) (let ((use-package-expand-minimally t))