def-package!: specify id for deferred-load transient hooks

Makes them easier to identify in hook lists.
This commit is contained in:
Henrik Lissner 2018-05-15 13:42:17 +02:00
parent 6b8520d189
commit 97b8c04dbb
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -462,7 +462,9 @@ MODULES is an malformed plist of modules to load."
(setq plist (plist-put plist :defer (or (cdr-safe defer) t)))
(unless (or (memq value '(t nil))
(number-or-marker-p value))
`(add-transient-hook! ',value (require ',name))))
`(add-transient-hook! ',value
,(intern (format "load-%s" name))
(require ',name))))
(use-package ,name ,@plist))))
(defmacro def-package-hook! (package when &rest body)