From: kaoru <kaoru>
Date: Fri, 1 Jan 2010 11:31:09 +0000 (+0000)
Subject: * wl-draft.el (wl-draft-reply): Use `elmo-parse' instead of `wl-parse'.
X-Git-Tag: elmo-imap4-compliance-root~72
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b790086f20d9f5ad5fba71b91bdb1ece05d7b689;p=elisp%2Fwanderlust.git

* wl-draft.el (wl-draft-reply): Use `elmo-parse' instead of `wl-parse'.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index db33950..08b4eab 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -21,6 +21,7 @@
 
 	* wl-draft.el (wl-draft-do-fcc): Use `with-temp-buffer'.
 
+	* wl-draft.el (wl-draft-reply): Use `elmo-parse' instead of `wl-parse'.
 
 2009-12-16  Lloyd Zusman <ljz@asfast.com>
 
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 828b50a..c8469ff 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -407,7 +407,7 @@ or `wl-draft-reply-with-argument-list' if WITH-ARG argument is non-nil."
       (setq mail-followup-to (wl-delete-duplicates mail-followup-to nil t)))
     (with-temp-buffer			; to keep raw buffer unibyte.
       (set-buffer-multibyte default-enable-multibyte-characters)
-      (setq newsgroups (wl-parse newsgroups
+      (setq newsgroups (elmo-parse newsgroups
 				 "[ \t\f\r\n,]*\\([^ \t\f\r\n,]+\\)")
 	    newsgroups (wl-delete-duplicates newsgroups)
 	    newsgroups