From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Sun, 12 Apr 2015 12:47:58 +0000 (+0100)
Subject: * lisp/emacs-lisp/package.el (list-packages): Avoid redundant generate
X-Git-Tag: emacs-25.0.90~2471
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d0fcb21254394e22542dbc350220db3bafe0cc13;p=emacs.git

* lisp/emacs-lisp/package.el (list-packages): Avoid redundant generate
---

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)))