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

Add :defer-incrementally use-package keyword

Browse source
This commit is contained in:
Henrik Lissner 2018-09-20 10:41:19 -04:00
parent 9c4147bbbb
commit b653039535
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
3 changed files with 26 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

13
core/core-modules.el
View file

@ -204,10 +204,23 @@ non-nil, return paths of possible modules, activated or otherwise."
;; remove itself from the hook/function).
(defvar doom--deferred-packages-alist '(t))
(after! use-package-core
(add-to-list 'use-package-deferring-keywords :defer-incrementally nil #'eq)
(add-to-list 'use-package-deferring-keywords :after-call nil #'eq)
(setq use-package-keywords
(use-package-list-insert :defer-incrementally use-package-keywords :after))
(setq use-package-keywords
(use-package-list-insert :after-call use-package-keywords :after))
(defalias 'use-package-normalize/:defer-incrementally 'use-package-normalize-symlist)
(defun use-package-handler/:defer-incrementally (name _keyword targets rest state)
(use-package-concat
`((doom-load-packages-incrementally
',(if (listp targets)
targets
(list name))))
(use-package-process-keywords name rest state)))
(defalias 'use-package-normalize/:after-call 'use-package-normalize-symlist)
(defun use-package-handler/:after-call (name _keyword hooks rest state)
(if (plist-get state :demand)