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

Don't add autoload for existing commands

This commit is contained in:
Nicolas Richard 2014-12-11 08:42:53 +01:00
parent 18f04bfb99
commit a2b23f8326

View file

@ -434,8 +434,10 @@ For full documentation. please see commentary.
(not (use-package-plist-get args :demand)))
(let (form)
(mapc #'(lambda (command)
(push `(autoload (function ,command)
,name-string nil t) form))
(push `(unless (fboundp (quote ,command))
(autoload (function ,command)
,name-string nil t))
form))
commands)
`(when ,(or predicate t)