diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-04-12 13:47:58 +0100 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-04-12 13:47:58 +0100 |
commit | d0fcb21254394e22542dbc350220db3bafe0cc13 (patch) | |
tree | 56e66b6e0a461e3c66bc3075581c4ad2477e54cf /lisp/emacs-lisp | |
parent | d06eeb85e0445eddedc42480d9a0d9928eed357e (diff) | |
download | emacs-d0fcb21254394e22542dbc350220db3bafe0cc13.tar.gz emacs-d0fcb21254394e22542dbc350220db3bafe0cc13.tar.bz2 emacs-d0fcb21254394e22542dbc350220db3bafe0cc13.zip |
* lisp/emacs-lisp/package.el (list-packages): Avoid redundant generate
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/package.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index dac70af9616..ded2faa54f6 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -2951,7 +2951,9 @@ The list is displayed in a buffer named `*Packages*'." ;; Fetch the remote list of packages. (unless no-fetch (package-menu-refresh)) - (package-menu--generate nil t)) + ;; If we're not async, this would be redundant. + (when package-menu-async + (package-menu--generate nil t))) ;; The package menu buffer has keybindings. If the user types ;; `M-x list-packages', that suggests it should become current. (switch-to-buffer buf))) |