From: yamaoka <yamaoka>
Date: Wed, 12 Sep 2001 00:54:51 +0000 (+0000)
Subject: * wl-vars.el (wl-biff-state-indicator-on): Use `*iso-2022-jp*' when Mule 2
X-Git-Tag: wl-2_6_1~42
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fwanderlust.git;a=commitdiff_plain;h=eba52ba9176812166fe1f7568a2595e344e1cebb

* wl-vars.el (wl-biff-state-indicator-on): Use `*iso-2022-jp*' when Mule 2
 is running.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 79f6d9e..e310aab 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-11  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* wl-vars.el (wl-biff-state-indicator-on): Use `*iso-2022-jp*'
+	when Mule 2 is running.
+
 2001-09-03  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* wl-e21.el (make-mode-line-mouse-map): Import from Emacs
diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index d227c55..dbd2100 100644
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -1456,8 +1456,11 @@ every intervals specified by wl-biff-check-interval."
 					       (not (featurep 'mule)))
 					  "[Mail]"
 					(decode-coding-string
+					 ;; Youbin mark
 					 (read "\"[\e$B\\\")\e(B]\"")
-					 'iso-2022-jp)) ; Youbin mark
+					 (if (boundp 'MULE)
+					     '*iso-2022-jp*
+					   'iso-2022-jp)))
   "String used to show biff status ON."
   :type 'string
   :group 'wl-highlight)