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

diff -r a62278954f43 -r ed0efa62bd7d lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Mon Mar 29 09:29:19 2010 +0000
+++ b/lisp/gnus/ChangeLog	Mon Mar 29 10:19:03 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 a62278954f43 -r ed0efa62bd7d lisp/gnus/mm-decode.el
--- a/lisp/gnus/mm-decode.el	Mon Mar 29 09:29:19 2010 +0000
+++ b/lisp/gnus/mm-decode.el	Mon Mar 29 10:19:03 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.