diff options
-rw-r--r-- | lisp/gnus/mm-decode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el index 6b539399596..6683d68a318 100644 --- a/lisp/gnus/mm-decode.el +++ b/lisp/gnus/mm-decode.el @@ -1413,8 +1413,8 @@ Return t if meta tag is added or replaced." (let ((case-fold-search t)) (goto-char (point-min)) (if (re-search-forward "\ -<meta\\s-+http-equiv=[\"']?content-type[\"']?\\s-+content=[\"']\ -text/\\(\\sw+\\)\\(?:;\\s-*charset=\\([^\"'>]+\\)\\)?[^>]*>" nil t) +<meta\\s-+http-equiv=[\"']?content-type[\"']?\\s-+content=[\"']?\ +text/\\(\\sw+\\)\\(?:;\\s-*charset=\\([^\t\n\r \"'>]+\\)\\)?[^>]*>" nil t) (if (and (not force-charset) (match-beginning 2) (string-match "\\`html\\'" (match-string 1))) |