emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Rewrite how doom-update-package updates from ELPA

Browse source 
This is an attempt to make package updating atomic. Previously, if
a package failed to update, it would've been deleted.
This commit is contained in:
Henrik Lissner 2017-06-03 21:01:32 +02:00
parent 77e2a1f6f2
commit 6807a5fda8
1 changed files with 10 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

12
core/autoload/packages.el
View file

@ -225,8 +225,16 @@ appropriate."
(let ((quelpa-upgrade-p t))
(quelpa (assq name quelpa-cache))))
('elpa
(doom-delete-package name t)
(doom-install-package name))))
(let* ((desc (cadr (assq name package-alist)))
(archive (cadr (assq name package-archive-contents)))
(packages
(if (package-desc-p archive)
(package-compute-transaction (list archive) (package-desc-reqs archive))
(package-compute-transaction () (list (list archive))))))
(package-download-transaction packages)
(when-let (old-dir (package-desc-dir desc))
(when (file-directory-p old-dir)
(delete-directory old-dir t)))))))
(version-list-=
(package-desc-version (cadr (assq name package-alist)))
(package-desc-version (cadr (assq name package-archive-contents))))))