mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 08:43:40 -07:00
Code Issues Projects Releases Wiki Activity

Don't add autoload for existing commands

Browse source
This commit is contained in:
Nicolas Richard 2014-12-11 08:42:53 +01:00
parent 18f04bfb99
commit a2b23f8326
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/use-package/use-package.el
View file

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