mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 14:30:50 -08:00
Code Issues Projects Releases Wiki Activity

Merge pull request from YoungFrog/fixautoloads

Browse source 
Don't add autoload for existing commands
GitHub-reference: https://github.com/jwiegley/use-package/issues/138
This commit is contained in:
John Wiegley 2014-12-17 15:53:42 -06:00
commit f8db1f1740
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

@ -450,8 +450,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)