fix(tazjin/emacs): suppress incredibly ennoying EPA error buffer

When entering an incorrect GPG key password, I don't want my whole
buffer layout ruined. A small error message in the modeline is enough.

Change-Id: I7318d685e74fa4e110a9bff30d0de9f7f18b2be4
Reviewed-on: https://cl.tvl.fyi/c/depot/+/9149
Reviewed-by: tazjin <tazjin@tvl.su>
Tested-by: BuildkiteCI
This commit is contained in:
Vincent Ambo 2023-08-23 23:18:05 +03:00 committed by tazjin
parent 254f81f5c9
commit e9bbc5f2af

View file

@ -114,7 +114,9 @@ the GPG agent correctly."
nil ;; predicate nil ;; predicate
t ;; require-match t ;; require-match
)) ))
(password (auth-source-pass-get 'secret entry))) (password (or (let ((epa-suppress-error-buffer t))
(auth-source-pass-get 'secret entry))
(error "failed to decrypt '%s', wrong password?" entry))))
(password-store-clear) (password-store-clear)
(kill-new password) (kill-new password)
(setq password-store-kill-ring-pointer kill-ring-yank-pointer) (setq password-store-kill-ring-pointer kill-ring-yank-pointer)