From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Thu, 21 May 2015 20:26:57 +0000 (+0100)
Subject: (package-menu-execute): Remove reference to remove-dups
X-Git-Tag: emacs-25.0.90~2021
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f590fc2760f8b8180a4caf77cea81840e37fe29e;p=emacs.git

(package-menu-execute): Remove reference to remove-dups
---

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 79f37e7def2..cf7ff9f6852 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -2993,9 +2993,10 @@ Optional argument NOQUERY non-nil means do not ask the user to confirm."
                        "]")))
           (message (replace-regexp-in-string "__" "ing" message-template) "started")
           ;; Packages being upgraded are not marked as selected.
-          (package--save-selected-packages
-           (remove-dups (append (mapcar #'package-desc-name .install)
-                                package-selected-packages)))
+          (when .install
+            (dolist (p .install)
+              (cl-pushnew (package-desc-name p) package-selected-packages))
+            (package--save-selected-packages package-selected-packages))
           (package-menu--perform-transaction install-list delete-list)
           (when package-selected-packages
             (if-let ((removable (package--removable-packages)))