Simplify after!

The featurep check is redundant. eval-after-load does it too.
This commit is contained in:
Henrik Lissner 2021-02-24 18:28:23 -05:00
parent eae7ca2c57
commit b8b51cee7b

View file

@ -361,13 +361,10 @@ This is a wrapper around `eval-after-load' that:
(require package nil 'noerror))
#'progn
#'with-no-warnings)
(let ((body (macroexp-progn body)))
`(if (featurep ',package)
,body
;; We intentionally avoid `with-eval-after-load' to prevent
;; eager macro expansion from pulling (or failing to pull) in
;; autoloaded macros/packages.
(eval-after-load ',package ',body)))))
;; We intentionally avoid `with-eval-after-load' to prevent eager
;; macro expansion from pulling (or failing to pull) in autoloaded
;; macros/packages.
`(eval-after-load ',package ',(macroexp-progn body))))
(let ((p (car package)))
(cond ((not (keywordp p))
`(after! (:and ,@package) ,@body))