1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00

; * lisp/epa-ks.el (epa-ks-do-key-to-fetch): Fix 'when' usage

This commit is contained in:
Philip Kaludercic 2022-12-27 13:46:40 +01:00
parent 2b55a48d3e
commit 8ab6df0c9f

View File

@ -135,9 +135,9 @@ Keys are marked using `epa-ks-mark-key-to-fetch'."
keys))
(forward-line))
(when (yes-or-no-p (format "Proceed with fetching all %d key(s)? "
(length keys))))
(dolist (id keys)
(epa-ks--fetch-key id))))
(length keys)))
(dolist (id keys)
(epa-ks--fetch-key id)))))
(tabulated-list-clear-all-tags))
(defun epa-ks--query-url (query exact)