From: yoichi <yoichi>
Date: Sun, 2 Jan 2005 14:35:52 +0000 (+0000)
Subject: * wl-vars.el (wl-pop-before-smtp-stream-type): Fix range.
X-Git-Tag: wl-2_14-root~101
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=3dd3248d5aebe77372d7fff22543281584f06fd1;p=elisp%2Fwanderlust.git

* wl-vars.el (wl-pop-before-smtp-stream-type): Fix range.
(wl-nntp-posting-stream-type): Ditto.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 52cbc37..c133820 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2005-01-02  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+	* wl-vars.el (wl-pop-before-smtp-stream-type): Fix range.
+	(wl-nntp-posting-stream-type): Ditto.
+
 2005-01-01  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* wl-demo.el (wl-demo-copyright-notice): Add 2005.
diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 6a7d702..08e5a5d 100644
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -631,7 +631,8 @@ If nil, `elmo-pop3-default-port' is used."
 (defcustom wl-pop-before-smtp-stream-type nil
   "*Stream type for POP-before-SMTP.
 If nil, `elmo-pop3-default-stream-type' is used."
-  :type 'boolean
+  :type '(choice (const :tag "Use `elmo-pop3-default-stream-type'" nil)
+		 symbol)
   :group 'wl)
 
 (defcustom wl-pop-before-smtp-authenticate-type nil
@@ -668,7 +669,8 @@ If nil, `elmo-nntp-default-port' is used."
 (defcustom wl-nntp-posting-stream-type nil
   "*Stream type for posting Netnews.
 If nil, `elmo-nntp-default-stream-type' is used."
-  :type 'boolean
+  :type '(choice (const :tag "Use `elmo-nntp-default-stream-type'" nil)
+		 symbol)
   :group 'wl)
 (defcustom wl-nntp-posting-function 'elmo-nntp-post
   "A function to post news.