From: hmurata <hmurata>
Date: Wed, 23 Nov 2005 12:34:39 +0000 (+0000)
Subject: (elmo-spam-message-fetch): Disable multibyte
X-Git-Tag: wl-2_15_3~34
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4b9907d8f7b779cc0d22b64fefc41a162daee062;p=elisp%2Fwanderlust.git

(elmo-spam-message-fetch): Disable multibyte
characters of working buffer.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 8d2317e..1619585 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,5 +1,8 @@
 2005-11-23  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
+	* elmo-spam.el (elmo-spam-message-fetch): Disable multibyte
+	characters of working buffer.
+
 	* modb-entity.el (elmo-msgdb-create-message-entity-from-buffer):
 	Does not bind `default-mime-charset'.
 	(elmo-msgdb-create-message-entity-from-buffer): Removed
diff --git a/elmo/elmo-spam.el b/elmo/elmo-spam.el
index 1870d26..e7580fe 100644
--- a/elmo/elmo-spam.el
+++ b/elmo/elmo-spam.el
@@ -122,6 +122,8 @@ If optional argument RESTORE is non-nil, unregister from spam list.")
 ;; for internal use
 (defun elmo-spam-message-fetch (folder number)
   (let (elmo-message-fetch-threshold)
+    (when enable-multibyte-characters
+      (set-buffer-multibyte nil))
     (elmo-message-fetch
      folder number
      (elmo-find-fetch-strategy folder number nil 'entire)