1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

Fix syntax error in message-add-openpgp-header

* lisp/gnus/message.el (message-add-openpgp-header): Remove
redundant (and syntactically wrong) check.
This commit is contained in:
Lars Ingebrigtsen 2020-10-25 15:16:05 +01:00
parent b0a7a19d5d
commit 35df337979

View file

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