From fb32368efdaf11ae0e6b3a28f4a167886caa4c9d Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 21 Sep 2021 17:41:26 +0200 Subject: [PATCH] Fix PGP verification buttons (which would have cached results) * lisp/gnus/mm-uu.el (mm-uu-pgp-signed-extract): `format' was used here to guarantee a new, fresh string (since it's destructively modified), but that's apparently not the case any more. Use `substring' instead, which is documented to do this. --- lisp/gnus/mm-uu.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/gnus/mm-uu.el b/lisp/gnus/mm-uu.el index 9d4c4bfead7..647b97c8662 100644 --- a/lisp/gnus/mm-uu.el +++ b/lisp/gnus/mm-uu.el @@ -511,7 +511,7 @@ apply the face `mm-uu-extract'." (list (mm-make-handle buf mm-uu-text-plain-type))))) (defun mm-uu-pgp-signed-extract () - (let ((mm-security-handle (list (format "multipart/signed")))) + (let ((mm-security-handle (list (substring "multipart/signed")))) (mm-set-handle-multipart-parameter mm-security-handle 'protocol "application/x-gnus-pgp-signature") (save-restriction -- 2.39.5