diff options
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/package.el | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 33d74cc7663..53d04b0d5ec 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -2272,16 +2272,12 @@ had been enabled." ;; `pkg-desc' will be nil when the package is an "active built-in". (if (and pkg-desc (package-vc-p pkg-desc)) (package-vc-upgrade pkg-desc) + (when pkg-desc + (package-delete pkg-desc 'force 'dont-unselect)) (package-install package ;; An active built-in has never been "selected" ;; before. Mark it as installed explicitly. - (and pkg-desc 'dont-select)) - ;; We delete the old package via the descriptor after installing - ;; the new package to avoid losing the package if there issues - ;; during installation (Bug#74556). - (when pkg-desc - (cl-assert (package-desc-dir pkg-desc)) - (package-delete pkg-desc 'force 'dont-unselect))))) + (and pkg-desc 'dont-select))))) (defun package--upgradeable-packages (&optional include-builtins) ;; Initialize the package system to get the list of package |