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.
This commit is contained in:
Lars Ingebrigtsen 2021-09-21 17:41:26 +02:00
parent 18c18c69fc
commit fb32368efd

View file

@ -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