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

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 7d86ddc0f7c3a87add71d9f7d0b4f2250b62d442..e31324b1f25dfe90edd2499798cabc0f179ba720 100644 (file)
--- 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 8e625c936e464c737838a4ed7ea2352387004769..510a8c955580c3e7ac964732aa4a3d03eac44a01 100644 (file)
--- 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."