emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master f590fc2: (package-menu-execute): Remove reference t


From: Artur Malabarba
Subject: [Emacs-diffs] master f590fc2: (package-menu-execute): Remove reference to remove-dups
Date: Thu, 21 May 2015 20:27:46 +0000

branch: master
commit f590fc2760f8b8180a4caf77cea81840e37fe29e
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>

    (package-menu-execute): Remove reference to remove-dups
---
 lisp/emacs-lisp/package.el |    7 ++++---
 1 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 79f37e7..cf7ff9f 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)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]