Improve error-handling in doom/update-package
This commit is contained in:
parent
99e916348a
commit
efa577dec2
1 changed files with 9 additions and 6 deletions
|
@ -427,12 +427,15 @@ calls."
|
||||||
(declare (interactive-only t))
|
(declare (interactive-only t))
|
||||||
(interactive
|
(interactive
|
||||||
(let* ((packages (doom-get-outdated-packages))
|
(let* ((packages (doom-get-outdated-packages))
|
||||||
(package (if packages
|
(selection (if packages
|
||||||
(completing-read "Update package: "
|
(completing-read "Update package: "
|
||||||
(mapcar #'car packages)
|
(mapcar #'car packages)
|
||||||
nil t)
|
nil t)
|
||||||
(user-error "All packages are up to date"))))
|
(user-error "All packages are up to date")))
|
||||||
(list (cdr (assq (car (assoc package package-alist)) packages)))))
|
(name (car (assoc selection package-alist))))
|
||||||
|
(unless name
|
||||||
|
(user-error "'%s' is already up-to-date" selection))
|
||||||
|
(list (cdr (assq name packages)))))
|
||||||
(doom-initialize-packages)
|
(doom-initialize-packages)
|
||||||
(cl-destructuring-bind (package old-version new-version) pkg
|
(cl-destructuring-bind (package old-version new-version) pkg
|
||||||
(if-let* ((desc (doom-package-outdated-p package)))
|
(if-let* ((desc (doom-package-outdated-p package)))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue