* wl-vars.el (wl-draft-reply-without-argument-list):

Changed default value to consider `Reply-To:'.
(Advised by TAKAHASHI Kaoru <kaoru@kaisei.org>)

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 134d4ff..9aad515 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,5 +1,9 @@
 2000-10-17  Yuuichi Teranishi  <teranisi@gohome.org>
 
+       * wl-vars.el (wl-draft-reply-without-argument-list):
+       Changed default value to consider `Reply-To:'.
+       (Advised by TAKAHASHI Kaoru <kaoru@kaisei.org>)
+
        * wl-summary.el (wl-summary-msgdb-load-async): Enclose
        elmo-imap4-get-session with unwind-protect.
        Don't cause error.

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index ba71247..5172c31 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -545,6 +545,7 @@ Default is for 'reply-to-author'."
 (defcustom wl-draft-reply-without-argument-list
   '(("Followup-To" . (nil nil ("Followup-To")))
     ("Mail-Followup-To" . (("Mail-Followup-To") nil ("Newsgroups")))
+    ("Reply-To" . (("Reply-To") ("To" "Cc") ("Newsgroups")))
     ("From" . (("From") ("To" "Cc") ("Newsgroups"))))
   "Alist of cons cell of
 ('field-name' .  ('fields for To' 'fields for Cc' 'fields for Newsgroups'))