projects
/
gnus
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
44ad7d9
)
mm-decode.el (mm-add-meta-html-tag): Fix last change
author
Katsumi Yamaoka
<yamaoka@jpl.org>
Wed, 18 Sep 2013 00:25:06 +0000
(
00:25
+0000)
committer
Katsumi Yamaoka
<yamaoka@jpl.org>
Wed, 18 Sep 2013 00:25:06 +0000
(
00:25
+0000)
lisp/mm-decode.el
patch
|
blob
|
history
diff --git
a/lisp/mm-decode.el
b/lisp/mm-decode.el
index
07e66b3
..
941849d
100644
(file)
--- a/
lisp/mm-decode.el
+++ b/
lisp/mm-decode.el
@@
-1415,7
+1415,7
@@
Return t if meta tag is added or replaced."
(goto-char (point-min))
(if (re-search-forward "\
<meta\\s-+http-equiv=[\"']?content-type[\"']?\\s-+content=[\"']\
(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 (not force-charset)
(match-beginning 2)
(string-match "\\`html\\'" (match-string 1)))
(if (and (not force-charset)
(match-beginning 2)
(string-match "\\`html\\'" (match-string 1)))