Prepare for 2.10.1.

[elisp/wanderlust.git] / wl / wl-vars.el

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 02cb26a..b37442d 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -181,7 +181,7 @@ If you don't have multiple e-mail addresses, you don't have to set this."
   :group 'wl-summary)
 
 (defcustom wl-summary-default-view-alist nil
-  "An alist of folder name and summary default view.
+  "An alist of regexp for folder name and summary default view.
 If no match, `wl-summary-default-view' is used."
   :type '(repeat (cons (regexp :tag "Folder Regexp")
                       (choice (const :tag "Thread" thread)
@@ -1359,7 +1359,11 @@ Allowed situations are:
   :type '(repeat (cons (string :tag "Realname") (string :tag "Petname")))
   :group 'wl-folder)
 
-(defcustom wl-summary-weekday-name-lang "ja"
+(defcustom wl-summary-weekday-name-lang
+  (if (and (boundp 'current-language-environment)
+          (string-equal "Japanese"
+                        (symbol-value 'current-language-environment)))
+      "ja" "en")
   "*Language to display week day."
   :type '(choice (const "ja")
                 (const "en")