(mm-set-buffer-multibyte): New function.

2 files changed, 3 insertions, 0 deletions

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 7d86ddc0f7c..e31324b1f25 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,7 @@
 2008-03-20  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+        * mm-util.el (mm-set-buffer-multibyte): New function.
+
         * gnus-win.el (gnus-configure-frame, gnus-all-windows-visible-p):
         Prefer fboundp to functionp so it works with macros as well.
 
diff --git a/lisp/gnus/mm-util.el b/lisp/gnus/mm-util.el
index 8e625c936e4..510a8c95558 100644
--- a/lisp/gnus/mm-util.el
+++ b/lisp/gnus/mm-util.el
@@ -105,6 +105,7 @@
      (multibyte-string-p . ignore)
      (insert-byte . insert-char)
      (multibyte-char-to-unibyte . identity)
+     (set-buffer-multibyte . ignore)
      (special-display-p
       . (lambda (buffer-name)
           "Returns non-nil if a buffer named BUFFER-NAME gets a special frame."