* wl-vars.el: Changed file coding system to ISO-2022-JP.

Removed redundant require of elmo-vars.
(wl-biff-state-indicator-on): Changed default value for
xemacs with non-mule environment.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 14e22e3..3230630 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2001-07-04  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * 2.6.0 is released.
+
 2001-06-18  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * elmo-pop3.el (elmo-network-close-session): Removed 3rd argument.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index e9c4886..0f6f507 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,5 +1,14 @@
+2001-07-05  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * wl-vars.el: Changed file coding system to ISO-2022-JP.
+       Removed redundant require of elmo-vars.
+       (wl-biff-state-indicator-on): Changed default value for
+       xemacs with non-mule environment.
+
 2001-07-04  Yuuichi Teranishi  <teranisi@gohome.org>
 
+       * 2.6.0 is released.
+
        * wl-vars.el: Changed file coding system to euc-japan.
        Added -*-coding:-*- magic to the first line.
 

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index fe79370..d9869e7 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -1,4 +1,4 @@
-;;; wl-vars.el -- Variable definitions for Wanderlust. -*-coding:euc-japan;-*-
+;;; wl-vars.el -- Variable definitions for Wanderlust.
 
 ;; Copyright (C) 1998,1999,2000,2001 Yuuichi Teranishi <teranisi@gohome.org>
 ;; Copyright (C) 1998,1999,2000,2001 Masahiro MURATA <muse@ba2.so-net.ne.jp>
@@ -104,8 +104,6 @@
   (and wl-on-mule (or wl-on-xemacs
                      (> emacs-major-version 19))))
 
-(require 'elmo-vars)
-
 (eval-when-compile
   (defun-maybe locate-data-directory (a)))
 
@@ -1449,12 +1447,17 @@ every intervals specified by wl-biff-check-interval."
   :type 'integer
   :group 'wl-highlight)
 
-(defcustom wl-biff-state-indicator-on "[¢©]"
+(defcustom wl-biff-state-indicator-on (if (and (featurep 'xemacs)
+                                              (not (featurep 'mule)))
+                                         "[Mail]"
+                                       (decode-coding-string
+                                        (read "\"[\e$B\\\")\e(B]\"")
+                                        'iso-2022-jp)) ; Youbin mark
   "String used to show biff status ON."
   :type 'string
   :group 'wl-highlight)
 
-(defcustom wl-biff-state-indicator-off "[¡¾]"
+(defcustom wl-biff-state-indicator-off "[\e$B!>\e(B]"
   "String used to show biff status OFF."
   :type 'string
   :group 'wl-highlight)
@@ -2152,15 +2155,15 @@ a symbol `bitmap', `xbm' or `xpm' in order to force the image format."
 ;; Advanced thread view.
 (defvar wl-thread-indent-level 1
   "*Indent level for thread.")
-(defvar wl-thread-have-younger-brother-str "¨²"
+(defvar wl-thread-have-younger-brother-str "\e$B(2\e(B"
   "*A string for thread branch line.  It should contain one character.")
-(defvar wl-thread-youngest-child-str       "¨±"
+(defvar wl-thread-youngest-child-str       "\e$B(1\e(B"
   "*A string for thread branch line.  It should contain one character.")
-(defvar wl-thread-vertical-str             "¨­"
+(defvar wl-thread-vertical-str             "\e$B(-\e(B"
   "*A string for thread branch line.  It should contain one character.")
-(defvar wl-thread-horizontal-str           "¨¬"
+(defvar wl-thread-horizontal-str           "\e$B(,\e(B"
   "*A string for thread branch line.  It should contain one character.")
-(defvar wl-thread-space-str                "¡¡"
+(defvar wl-thread-space-str                "\e$B!!\e(B"
   "*A string for thread branch line.  It should contain one character.")
 
 (defvar wl-highlight-thread-indent-string-regexp "[^[<]*"