From: Katsumi Yamaoka Date: Mon, 29 Mar 2010 10:16:37 +0000 (+0000) Subject: (mm-add-meta-html-tag): Fix regexp matching meta tag. X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~641 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9d9ef8e860e4251b0369d845216333225392004a;p=emacs.git (mm-add-meta-html-tag): Fix regexp matching meta tag. --- diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index f2d6714dff4..6786dff9b59 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2010-03-29 Katsumi Yamaoka + + * mm-decode.el (mm-add-meta-html-tag): Fix regexp matching meta tag. + 2010-03-29 Teodor Zlatanov * auth-source.el (auth-source-pick): Fix for non-secrets specifier. diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el index 8bc659f5184..58ba3ec7413 100644 --- a/lisp/gnus/mm-decode.el +++ b/lisp/gnus/mm-decode.el @@ -1273,7 +1273,7 @@ or replaced." (goto-char (point-min)) (if (re-search-forward "\ ]*>" 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.