diff options
author | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-03-29 10:16:23 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-03-29 10:16:23 +0000 |
commit | a2c9fe43660e50d34f7992bf3387908522e4bd02 (patch) | |
tree | 53464fba2e18d416eea9092e0500a6d03f863314 | |
parent | 2a793f7f35d279ed7304772718613e40edfa917d (diff) | |
download | emacs-a2c9fe43660e50d34f7992bf3387908522e4bd02.tar.gz |
(mm-add-meta-html-tag): Fix regexp matching meta tag.
-rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/gnus/mm-decode.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 7f37775bc5d..0106e6212c5 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2010-03-29 Katsumi Yamaoka <yamaoka@jpl.org> + + * mm-decode.el (mm-add-meta-html-tag): Fix regexp matching meta tag. + 2010-03-27 Chong Yidong <cyd@stupidchicken.com> * message.el (message-default-mail-headers): diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el index a511253dddb..ac05362ec0c 100644 --- a/lisp/gnus/mm-decode.el +++ b/lisp/gnus/mm-decode.el @@ -1265,7 +1265,7 @@ or replaced." (goto-char (point-min)) (if (re-search-forward "\ <meta\\s-+http-equiv=[\"']?content-type[\"']?\\s-+content=[\"']\ -text/\\(\\sw+\\)\\(?:\;\\s-*charset=\\(.+?\\)\\)?[\"'][^>]*>" nil t) +text/\\(\\sw+\\)\\(?:\;\\s-*charset=\\(.+\\)\\)?[\"'][^>]*>" nil t) (if (and (match-beginning 2) (string-match "\\`html\\'" (match-string 1))) ;; Don't modify existing meta tag. |