Commit 8fab3e39 authored by Lars Magne Ingebrigtsen's avatar Lars Magne Ingebrigtsen Committed by Katsumi Yamaoka

gnus-html.el: Remove more white space before <pre_int> image spacers; Decode...

gnus-html.el: Remove more white space before <pre_int> image spacers; Decode entities at the end.  So that entities inside the tags don't mess up the rest of the "parsing".
parent 25f28806
......@@ -5,6 +5,10 @@
(gnus-html-insert-image): New command and keystroke.
(gnus-html-redisplay-with-images): New command and keystroke.
(gnus-html-show-images): Renamed command.
(gnus-html-wash-tags): Remove more white space before <pre_int> image
spacers.
(gnus-html-wash-tags): Decode entities at the end, so that entities
inside the tags don't mess up the rest of the "parsing".
* gnus-agent.el (gnus-agent-auto-agentize-methods): Change the default
so that nnimap methods aren't agentized by default. There's apparently
......
......@@ -113,7 +113,7 @@ fit these criteria."
(let (tag parameters string start end images url)
(mm-url-decode-entities)
(goto-char (point-min))
(while (re-search-forward "<pre_int> *</pre_int>\n" nil t)
(while (re-search-forward " *<pre_int> *</pre_int>\n" nil t)
(replace-match "" t t))
(goto-char (point-min))
(while (re-search-forward "<\\([^ />]+\\)\\([^>]*\\)>" nil t)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment