aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/gnus/mml-sec.el
diff options
context:
space:
mode:
authorStefan Monnier2026-03-09 10:34:05 -0400
committerStefan Monnier2026-03-09 10:34:05 -0400
commit0487d68ab9992be4fa70cfd908909001f71e66af (patch)
tree8c93da3b94717d184f88277e277de949ecb2fb9c /lisp/gnus/mml-sec.el
parent798dceb467d4ead092979822f24090c8378f8320 (diff)
downloademacs-scratch/error-API.tar.gz
emacs-scratch/error-API.zip
Diffstat (limited to 'lisp/gnus/mml-sec.el')
-rw-r--r--lisp/gnus/mml-sec.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/mml-sec.el b/lisp/gnus/mml-sec.el
index 700a99fe5d8..85b7d3a879c 100644
--- a/lisp/gnus/mml-sec.el
+++ b/lisp/gnus/mml-sec.el
@@ -939,7 +939,7 @@ If no one is selected, symmetric encryption will be performed. "
939 mml-secure-secret-key-id-list nil) 939 mml-secure-secret-key-id-list nil)
940 (error 940 (error
941 (mml-secure-clear-secret-key-id-list) 941 (mml-secure-clear-secret-key-id-list)
942 (signal (car error) (cdr error)))) 942 (signal error)))
943 cipher)) 943 cipher))
944 944
945(defun mml-secure-sender-sign-query (protocol sender) 945(defun mml-secure-sender-sign-query (protocol sender)
@@ -1029,7 +1029,7 @@ Returns non-nil if the user has chosen to use SENDER."
1029 mml-secure-secret-key-id-list nil) 1029 mml-secure-secret-key-id-list nil)
1030 (error 1030 (error
1031 (mml-secure-clear-secret-key-id-list) 1031 (mml-secure-clear-secret-key-id-list)
1032 (signal (car error) (cdr error)))) 1032 (signal error)))
1033 (if (epg-context-result-for context 'sign) 1033 (if (epg-context-result-for context 'sign)
1034 (setq micalg (epg-new-signature-digest-algorithm 1034 (setq micalg (epg-new-signature-digest-algorithm
1035 (car (epg-context-result-for context 'sign))))) 1035 (car (epg-context-result-for context 'sign)))))