From 35df337979e5e719c12cb80dd6a5dbda5f46b56d Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sun, 25 Oct 2020 15:16:05 +0100 Subject: [PATCH] Fix syntax error in message-add-openpgp-header * lisp/gnus/message.el (message-add-openpgp-header): Remove redundant (and syntactically wrong) check. --- lisp/gnus/message.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 150f70e240f..0782778fd43 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -2788,9 +2788,7 @@ Consider adding this function to `message-header-setup-hook'" ;; add URL (when (nth 1 message-openpgp-header) (when need-sep (insert "; ")) - (if (string-match-p ";") - (insert "url=\"" (nth 1 message-openpgp-header) "\"") - (insert "url=\"" (nth 1 message-openpgp-header) "\"")) + (insert "url=\"" (nth 1 message-openpgp-header) "\"") (setq need-sep t)) ;; add preference (when (nth 2 message-openpgp-header) -- 2.39.2