From: ari Date: Mon, 21 Jan 2002 17:24:46 +0000 (+0000) Subject: * lisp/gnus-art.el (gnus-article-display-traditional-message): Use X-Git-Tag: t-gnus-6_15_6-01-quimby~116 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=c4e61066b363fc25460f191bcaba11136fa6083b;p=elisp%2Fgnus.git- * lisp/gnus-art.el (gnus-article-display-traditional-message): Use `set-buffer-multibyte'. --- diff --git a/ChangeLog b/ChangeLog index 7b6a099..bf0ac0d 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2002-01-21 ARISAWA Akihiro + + * lisp/gnus-art.el (gnus-article-display-traditional-message): Use + `set-buffer-multibyte'. + 2002-01-21 TSUCHIYA Masatoshi * 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 --- 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."