From: yoichi <yoichi>
Date: Sun, 1 Feb 2004 10:35:50 +0000 (+0000)
Subject: * wl-vars.el (wl-demo-background-color): The value can be nil.
X-Git-Tag: wl-2_11_24~11
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b9d3d6a2b75c4d5c19882d74304008d9df99cd52;p=elisp%2Fwanderlust.git

* wl-vars.el (wl-demo-background-color): The value can be nil.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index b9cfce4..b69d338 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2004-02-01  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+	* wl-vars.el (wl-demo-background-color): The value can be nil.
+
 2004-01-29  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* wl-summary.el (wl-summary-setup-mouse)[non-xemacs]: Bind mouse-wheel1
diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 2b527cc..32aed4f 100644
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -501,7 +501,8 @@ You had better set this variable if you set 'wl-insert-mail-followup-to' as t."
 (defcustom wl-demo-background-color "#d9ffd9"
   "The color name for demo background.
 If nil, the default face background is used."
-  :type '(string :tag "Color name")
+  :type '(choice (const :tag "Default")
+		 (string :tag "Color name"))
   :group 'wl-pref)
 
 (defcustom wl-envelope-from nil