diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 68d671d58f714360d14991ed383cf4aecd4f9cfd..4acb6a8a621c5fb2ef3d200cb62841122f07d05b 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2010-09-02 Katsumi Yamaoka + + * gnus-html.el (gnus-article-html): Make work buffer multibyte for + decoded contents. + 2010-09-02 Lars Magne Ingebrigtsen * 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 7e13a0bde979c043dfe8f8eff1cb8b2e9adc5da7..80eaae680520948497dd009dfc053da9f803f034 100644 --- a/lisp/gnus/gnus-html.el +++ b/lisp/gnus/gnus-html.el @@ -82,7 +82,10 @@ fit these criteria." (when (and charset (setq charset (mm-charset-to-coding-system charset)) (not (eq charset 'ascii))) - (mm-decode-coding-region (point-min) (point-max) charset)) + (insert (prog1 + (mm-decode-coding-string (buffer-string) charset) + (erase-buffer) + (mm-enable-multibyte)))) (call-process-region (point-min) (point-max) "w3m" nil article-buffer nil