Avoid duplicates in `package-activated-list'

* lisp/emacs-lisp/package.el (package-quickstart-refresh): Calling
`package-activate-all' twice leads to duplicates in
`package-activated-list' - avoid that.
This commit is contained in:
Sam Steingold 2022-05-26 16:18:09 -04:00
parent 37b3624cd2
commit 3d567a5517

View file

@ -4295,8 +4295,9 @@ activations need to be changed, such as when `package-load-list' is modified."
(insert ")\n")))
(pp `(defvar package-activated-list) (current-buffer))
(pp `(setq package-activated-list
(append ',(mapcar #'package-desc-name package--quickstart-pkgs)
package-activated-list))
(delete-dups
(append ',(mapcar #'package-desc-name package--quickstart-pkgs)
package-activated-list)))
(current-buffer))
(let ((info-dirs (butlast Info-directory-list)))
(when info-dirs