From: Katsumi Yamaoka <yamaoka@jpl.org>
Date: Thu, 2 Sep 2010 03:47:31 +0000 (+0000)
Subject: gnus-article-html: Make work buffer multibyte for decoded contents.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~48^2~133
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=60893e6f01d36a0e4d3c1c584cbae0d26259373a;p=emacs.git

gnus-article-html: Make work buffer multibyte for decoded contents.
---

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 @@
+2010-09-02  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* gnus-html.el (gnus-article-html): Make work buffer multibyte for
+	decoded contents.
+
 2010-09-02  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
 	* 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."
 	    (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