[elpa] externals/async 15bb3b7c57 1/4: Ensure to not add dups in package-selected-packages

[ELPA Syncer]

branch: externals/async
commit 15bb3b7c57b27356da941e3ebd4167c32007d619
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Ensure to not add dups in package-selected-packages
---
 async-package.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/async-package.el b/async-package.el
index 73ce14659a..6c7e4b9946 100644
--- a/async-package.el
+++ b/async-package.el
@@ -93,8 +93,11 @@ Argument ERROR-FILE is the file where errors are logged, if 
some."
               (async-package--modeline-mode -1))
           (when result
             (when (eq action 'install)
-              (customize-save-variable 'package-selected-packages
-                                       (append result 
package-selected-packages)))
+              (let ((pkgs (when result
+                            (if (listp result) result (list result)))))
+                (customize-save-variable
+                 'package-selected-packages
+                 (delete-dups (append pkgs package-selected-packages)))))
             (package-initialize) ; load packages.
             (async-package--modeline-mode -1)
             (message "%s %s packages done" action-string (length packages))