* 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 (file)
--- 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 (file)
--- 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)