# HG changeset patch
# User Katsumi Yamaoka <yamaoka@jpl.org>
# Date 1269857797 0
# Node ID 2bfe0d4c1bc746b84c9bbbfad4a96755d64bb8bd
# Parent  3ce6e8cd52f1081eefa84f545f1485ed83244de2
(mm-add-meta-html-tag): Fix regexp matching meta tag.

diff -r 3ce6e8cd52f1 -r 2bfe0d4c1bc7 lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Mon Mar 29 09:37:26 2010 +0000
+++ b/lisp/gnus/ChangeLog	Mon Mar 29 10:16:37 2010 +0000
@@ -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-29  Teodor Zlatanov  <tzz@lifelogs.com>
 
 	* auth-source.el (auth-source-pick): Fix for non-secrets specifier.
diff -r 3ce6e8cd52f1 -r 2bfe0d4c1bc7 lisp/gnus/mm-decode.el
--- a/lisp/gnus/mm-decode.el	Mon Mar 29 09:37:26 2010 +0000
+++ b/lisp/gnus/mm-decode.el	Mon Mar 29 10:16:37 2010 +0000
@@ -1273,7 +1273,7 @@
 	(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.