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

* 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 0d09471..e758d72 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-11  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* wl-e21.el (wl-highlight-folder-current-line): Fixed regexp.
diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index e15e537..1e0a120 100644
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -1495,8 +1495,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)