From 18ad9dfe9592cc62a3d617ef8661913c6bbec020 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 21 Sep 2021 17:47:55 +0200 Subject: [PATCH] Fix usage of `format' in mm-uu-pgp-encrypted-extract * lisp/gnus/mm-uu.el (mm-uu-pgp-encrypted-extract): Use `substring' instead of `format' to ensure a fresh string. --- 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 647b97c8662..494221adeec 100644 --- a/lisp/gnus/mm-uu.el +++ b/lisp/gnus/mm-uu.el @@ -579,7 +579,7 @@ apply the face `mm-uu-extract'." (list (mm-make-handle buf '("application/pgp-encrypted"))))))) (defun mm-uu-pgp-encrypted-extract () - (let ((mm-security-handle (list (format "multipart/encrypted")))) + (let ((mm-security-handle (list (substring "multipart/encrypted")))) (mm-set-handle-multipart-parameter mm-security-handle 'protocol "application/x-gnus-pgp-encrypted") (save-restriction -- 2.39.5