diff options
| author | Katsumi Yamaoka | 2010-09-02 03:47:31 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2010-09-02 03:47:31 +0000 |
| commit | 60893e6f01d36a0e4d3c1c584cbae0d26259373a (patch) | |
| tree | 68c581be4f319cd53048477fe52a6c417c3fa76e | |
| parent | e5500d2a3f635e7c5a157576df6b9d57d02e2809 (diff) | |
| download | emacs-60893e6f01d36a0e4d3c1c584cbae0d26259373a.tar.gz emacs-60893e6f01d36a0e4d3c1c584cbae0d26259373a.zip | |
gnus-article-html: Make work buffer multibyte for decoded contents.
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/gnus-html.el | 5 |
2 files changed, 9 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 68d671d58f7..4acb6a8a621 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2010-09-02 Katsumi Yamaoka <yamaoka@jpl.org> | ||
| 2 | |||
| 3 | * gnus-html.el (gnus-article-html): Make work buffer multibyte for | ||
| 4 | decoded contents. | ||
| 5 | |||
| 1 | 2010-09-02 Lars Magne Ingebrigtsen <larsi@gnus.org> | 6 | 2010-09-02 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 7 | ||
| 3 | * gnus-group.el (gnus-group-line-format): Remove %O (moderated) from | 8 | * gnus-group.el (gnus-group-line-format): Remove %O (moderated) from |
diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el index 7e13a0bde97..80eaae68052 100644 --- a/lisp/gnus/gnus-html.el +++ b/lisp/gnus/gnus-html.el | |||
| @@ -82,7 +82,10 @@ fit these criteria." | |||
| 82 | (when (and charset | 82 | (when (and charset |
| 83 | (setq charset (mm-charset-to-coding-system charset)) | 83 | (setq charset (mm-charset-to-coding-system charset)) |
| 84 | (not (eq charset 'ascii))) | 84 | (not (eq charset 'ascii))) |
| 85 | (mm-decode-coding-region (point-min) (point-max) charset)) | 85 | (insert (prog1 |
| 86 | (mm-decode-coding-string (buffer-string) charset) | ||
| 87 | (erase-buffer) | ||
| 88 | (mm-enable-multibyte)))) | ||
| 86 | (call-process-region (point-min) (point-max) | 89 | (call-process-region (point-min) (point-max) |
| 87 | "w3m" | 90 | "w3m" |
| 88 | nil article-buffer nil | 91 | nil article-buffer nil |