diff options
| author | Philip Kaludercic <philipk@posteo.net> | 2023-05-14 21:22:59 +0200 |
|---|---|---|
| committer | Philip Kaludercic <philipk@posteo.net> | 2023-05-16 20:47:34 +0200 |
| commit | b5bfd808c6b40f47fdef8eb9986bc3127ca63c12 (patch) | |
| tree | 5e02a17ef53d79c58c76058443ab029381b63269 /lisp/emacs-lisp/package-vc.el | |
| parent | c18f9f155f6a7522bb4052a6b227b8a06ce38764 (diff) | |
| download | emacs-b5bfd808c6b40f47fdef8eb9986bc3127ca63c12.tar.gz emacs-b5bfd808c6b40f47fdef8eb9986bc3127ca63c12.tar.bz2 emacs-b5bfd808c6b40f47fdef8eb9986bc3127ca63c12.zip | |
Avoid duplicate VC packages in 'package-selected-packages'
* lisp/emacs-lisp/package-vc.el (package-vc--unpack-1): Check if
'package-selected-packages' already contains the package name.
(bug#63338)
Diffstat (limited to 'lisp/emacs-lisp/package-vc.el')
| -rw-r--r-- | lisp/emacs-lisp/package-vc.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index 1fcc30595da..17e93c430c9 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el @@ -506,9 +506,11 @@ documentation and marking the package as installed." (package--reload-previously-loaded new-desc))) ;; Mark package as selected - (package--save-selected-packages - (cons (package-desc-name pkg-desc) - package-selected-packages)) + (let ((name (package-desc-name pkg-desc))) + (unless (memq name package-selected-packages) + (package--save-selected-packages + (cons name package-selected-packages)))) + (package--quickstart-maybe-refresh) ;; Confirm that the installation was successful |