X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-art.el;h=c673cccff964db89270012463f39d09497113082;hb=31c28e438ad11d0e4dfa251bf705ef2d2b5ee972;hp=32399e1586fda04265e2f304042efe0b309ca538;hpb=27049d84774e4c9c6984be6654ce69031bd78599;p=gnus

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 32399e158..c673cccff 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -2231,7 +2231,8 @@ unfolded."
 		 (unfoldable
 		  (or (equal gnus-article-unfold-long-headers t)
 		      (and (stringp gnus-article-unfold-long-headers)
-			   (string-match gnus-article-unfold-long-headers header)))))
+			   (string-match gnus-article-unfold-long-headers
+					 header)))))
 	    (with-temp-buffer
 	      (insert header)
 	      (goto-char (point-min))
@@ -2754,9 +2755,11 @@ If READ-CHARSET, ask for a coding system."
   (let ((handles nil)
 	(buffer-read-only nil))
     (when (gnus-buffer-live-p gnus-original-article-buffer)
-      (setq handles (mm-dissect-buffer t t)))
+      (with-current-buffer gnus-original-article-buffer
+	(setq handles (mm-dissect-buffer t t))))
     (article-goto-body)
     (delete-region (point) (point-max))
+    (mm-enable-multibyte)
     (mm-inline-text-html handles)))
 
 (defvar gnus-article-browse-html-temp-list nil