awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases 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
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)