From: yoichi <yoichi>
Date: Sun, 2 Mar 2003 01:50:14 +0000 (+0000)
Subject: 2003-03-02  Jeremy Shaw  <jeremy.shaw@lindows.com>
X-Git-Tag: wl-2_10_1pre~28
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5941122e657b09dc5d6446a3c7b1ff32b9aee3b4;p=elisp%2Fwanderlust.git

2003-03-02  Jeremy Shaw  <jeremy.shaw@lindows.com>

	* wl-draft.el (wl-draft-reply): Fixed.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index e3f3190..dd9445f 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2003-03-02  Jeremy Shaw  <jeremy.shaw@lindows.com>
+
+	* wl-draft.el (wl-draft-reply): Fixed.
+
 2003-02-14  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 	* wl-xmas.el (wl-xmas-highlight-folder-group-line): Use
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 9e3c9dd..de4dd80 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -369,7 +369,7 @@ Reply to author if WITH-ARG is non-nil."
 					      r-to-list))
 				       ",")))
 	    (if (and r-cc-list (symbolp r-cc-list))
-		(setq cc (wl-concat-list (funcall r-to-list) ","))
+		(setq cc (wl-concat-list (funcall r-cc-list) ","))
 	      (setq cc (wl-concat-list (cons cc
 					     (elmo-multiple-fields-body-list
 					      r-cc-list))