master 631c73b: Quote other suspicious characters in mml-insert-tag.

[Lars Ingebrigtsen]

branch: master
commit 631c73b28010dd80c7c909a291d356ab91ea2eae
Author: Asher Gordon <AsDaGo@posteo.net>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Quote other suspicious characters in mml-insert-tag.
    
    * lisp/gnus/mml.el (mml-insert-tag): Ensure that the characters
    "[]<>=" are quoted correctly (bug#43009).
    Copyright-paperwork-exempt: yes
---
 lisp/gnus/mml.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el
index ef8aa6a..067396f 100644
--- a/lisp/gnus/mml.el
+++ b/lisp/gnus/mml.el
@@ -1360,7 +1360,7 @@ If not set, `default-directory' will be used."
          (value (pop plist)))
       (when value
        ;; Quote VALUE if it contains suspicious characters.
-       (when (string-match "[\"'\\~/*;() \t\n[:multibyte:]]" value)
+       (when (string-match "[][\"'\\~/*;()<>= \t\n[:multibyte:]]" value)
          (setq value (with-output-to-string
                        (let (print-escape-nonascii)
                          (prin1 value)))))