1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 14:30:50 -08:00

Merge pull request from tarsius/bind-later

Delay decision whether to use eval-after-load until run-time
GitHub-reference: https://github.com/jwiegley/use-package/issues/419
This commit is contained in:
John Wiegley 2016-12-18 15:17:20 -08:00 committed by GitHub
commit ba3064ed80

View file

@ -241,9 +241,9 @@ function symbol (unquoted)."
(cl-flet (cl-flet
((wrap (map bindings) ((wrap (map bindings)
(if (and map pkg (not (eq map 'global-map))) (if (and map pkg (not (eq map 'global-map)))
(if (boundp map) `((if (boundp ',map)
bindings (progn ,@bindings)
`((eval-after-load (eval-after-load
,(if (symbolp pkg) `',pkg pkg) ,(if (symbolp pkg) `',pkg pkg)
'(progn ,@bindings)))) '(progn ,@bindings))))
bindings))) bindings)))