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