From: yamaoka <yamaoka>
Date: Mon, 24 Sep 2001 23:01:05 +0000 (+0000)
Subject: * wl-vars.el: (wl-biff-state-indicator-off): Changed default value for
X-Git-Tag: wl-2_6_1~30
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=474b0d90b33bb40989a0897415c282e1994cdac1;p=elisp%2Fwanderlust.git

* wl-vars.el: (wl-biff-state-indicator-off): Changed default value for
 xemacs with non-mule environment.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 0658105..3585d5d 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-24  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* wl-vars.el: (wl-biff-state-indicator-off): Changed default value
+	for xemacs with non-mule environment.
+
 2001-09-21  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* wl-vars.el (wl-interactive-send): Set default value as t.
diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 3802b17..c455669 100644
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -1470,7 +1470,15 @@ every intervals specified by wl-biff-check-interval."
   :type 'string
   :group 'wl-highlight)
 
-(defcustom wl-biff-state-indicator-off "[‐]"
+(defcustom wl-biff-state-indicator-off (if (and (featurep 'xemacs)
+						(not (featurep 'mule)))
+					   "[--]"
+					 (decode-coding-string
+					  ;; Japanese short hyphen
+					  (read "\"[‐]\"")
+					  (if (boundp 'MULE)
+					      '*iso-2022-jp*
+					    'iso-2022-jp)))
   "String used to show biff status OFF."
   :type 'string
   :group 'wl-highlight)