Minor refactor of use-package-handler/:after-call

+ Duplicate hooks aren't a problem
+ letbind `fn` only when we need it
This commit is contained in:
Henrik Lissner 2018-06-23 19:29:29 +02:00
parent fbf7834d93
commit 16d3f75f1d
No known key found for this signature in database
GPG Key ID: 5F6C0EA160557395

View File

@ -190,10 +190,9 @@ non-nil, return paths of possible modules, activated or otherwise."
(defalias 'use-package-normalize/:after-call 'use-package-normalize-symlist)
(defun use-package-handler/:after-call (name _keyword hooks rest state)
(let ((fn (intern (format "doom|transient-hook--load-%s" name)))
(hooks (delete-dups hooks)))
(if (plist-get state :demand)
(use-package-process-keywords name rest state)
(let ((fn (intern (format "doom|transient-hook--load-%s" name))))
(use-package-concat
`((fset ',fn
(lambda (&rest _)