Use macro from w3. For details see ChangeLog.

[gnus] / lisp / mml.el

diff --git a/lisp/mml.el b/lisp/mml.el
index 7cbf381..d4a04b6 100644 (file)
--- a/lisp/mml.el
+++ b/lisp/mml.el
@@ -753,7 +753,7 @@ If MML is non-nil, return the buffer up till the correspondent mml tag."
       (goto-char (point-min))
       ;; Quote parts.
       (while (re-search-forward
-             "<#/?!*\\(multipart\\|part\\|external\\|mml\\)" nil t)
+             "<#!*/?\\(multipart\\|part\\|external\\|mml\\)" nil t)
        ;; Insert ! after the #.
        (goto-char (+ (match-beginning 0) 2))
        (insert "!")))))