From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 20 Mar 2008 15:47:15 +0000 (+0000)
Subject: (mm-set-buffer-multibyte): New function.
X-Git-Tag: emacs-pretest-23.0.90~7023
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=df06dd59a6401095be74a9d4eb763495e2414edd;p=emacs.git

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

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."