[gnus git] branch master updated: m0-7-258-gfc259d6 =1= gnus-art.el (gnus-article-browse-html-parts): Replace LWSPs with ` 's in header
Katsumi Yamaoka <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via fc259d69c6dc58c870d0165e53bbd3d306b67fb3 (commit)
from 9b6ee65f3a788aacf4c9a9b11c18d23cfe6cc176 (commit)
- Log -----------------------------------------------------------------
commit fc259d69c6dc58c870d0165e53bbd3d306b67fb3
Author: Katsumi Yamaoka <[email protected]>
Date: Wed Nov 27 01:59:25 2013 +0000
gnus-art.el (gnus-article-browse-html-parts): Replace LWSPs with ` 's in header
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e302b40..ed12191 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
2013-11-27 Katsumi Yamaoka <[email protected]>
+ * gnus-art.el (gnus-article-browse-html-parts):
+ Replace LWSPs with ` 's in header.
+
Work for broken Chinese articles.
* gnus-art.el (gnus-article-browse-html-save-cid-content):
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index fd9323f..7161b9a 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -2896,6 +2896,13 @@ message header will be added to the bodies of the \"text/html\" parts."
((match-beginning 3) "&")
(t "<br>\n"))))
(goto-char (point-min))
+ (while (re-search-forward "^[\t ]+" nil t)
+ (dotimes (i (prog1
+ (current-column)
+ (delete-region (match-beginning 0)
+ (match-end 0))))
+ (insert " ")))
+ (goto-char (point-min))
(insert "<div align=\"left\">\n")
(goto-char (point-max))
(insert "</div>\n<hr>\n")
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 3 +++
lisp/gnus-art.el | 7 +++++++
2 files changed, 10 insertions(+)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project