* lisp/gnus-art.el (gnus-article-display-traditional-message): Use

`set-buffer-multibyte'.

diff --git a/ChangeLog b/ChangeLog
index 7b6a099..bf0ac0d 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2002-01-21  ARISAWA Akihiro  <ari@mbf.sphere.ne.jp>
+
+       * lisp/gnus-art.el (gnus-article-display-traditional-message): Use
+       `set-buffer-multibyte'.
+
 2002-01-21  TSUCHIYA Masatoshi  <tsuchiya@namazu.org>
 
        * lisp/gnus-sum.el (gnus-summary-preview-mime-message): Protect

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 3613907..82100c1 100644 (file)
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -3628,7 +3628,9 @@ commands:
   (set-buffer gnus-article-buffer)
   (let (buffer-read-only)
     (erase-buffer)
-    (insert-buffer-substring gnus-original-article-buffer)))
+    (set-buffer-multibyte nil)
+    (insert-buffer-substring gnus-original-article-buffer)
+    (set-buffer-multibyte t)))
 
 (defun gnus-article-make-full-mail-header (&optional number charset)
   "Create a new mail header structure in a raw article buffer."