Don't macroexpand bind-keys, leave that to the evaluator

This commit is contained in:
John Wiegley 2017-12-01 00:45:43 -08:00
parent 5f1e8b6b72
commit 2c618e17c6

View file

@ -1097,9 +1097,8 @@ representing symbols (that may need to be autloaded)."
(use-package-plist-maybe-put rest :defer t))
(use-package-plist-append state :commands commands))
`((ignore
,(macroexpand
`(,(if bind-macro bind-macro 'bind-keys)
:package ,name ,@nargs)))))))
(,(if bind-macro bind-macro 'bind-keys)
:package ,name ,@nargs))))))
(defun use-package-handler/:bind* (name keyword arg rest state)
(use-package-handler/:bind name keyword arg rest state 'bind-keys*))