fix(lib): doom/bumpify-diff: respect structure of given list

The old check was a bug fix to work around noisy values that somehow
made it into diff checks. The `package!` symbol is never actually
present in the list of values yielded by the search in `read-package`,
so this commit alters the lookup to respect what is actually present,
thus guaranteeing that `destructuring-bind` succeeds and bump diffs are
actually detected.
This commit is contained in:
Colin Woodbury 2023-12-31 22:57:21 +09:00 committed by Henrik Lissner
parent dca4e4a8ed
commit 41289cfef6

View file

@ -239,7 +239,7 @@ Must be run from a magit diff buffer."
(unless (= (length before) (length after)) (unless (= (length before) (length after))
(user-error "Uneven number of packages being bumped")) (user-error "Uneven number of packages being bumped"))
(dolist (p1 before) (dolist (p1 before)
(when (and (listp p1) (eq (car p1) 'package!)) (when (and (listp p1) (plist-get (cdr p1) :package))
(cl-destructuring-bind (package &key plist _beg _end &allow-other-keys) p1 (cl-destructuring-bind (package &key plist _beg _end &allow-other-keys) p1
(let ((p2 (cdr (assq package after)))) (let ((p2 (cdr (assq package after))))
(if (null p2) (if (null p2)