From: okada <okada>
Date: Wed, 23 May 2001 09:36:33 +0000 (+0000)
Subject:         * wl-draft.el (wl-draft): use `wl-summary-write-current-folder'
X-Git-Tag: wl-2_6-root~27
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=700b167b1f468560b9f39bd4a3f868ce737d7250;p=elisp%2Fwanderlust.git

    * wl-draft.el (wl-draft): use `wl-summary-write-current-folder'
	  instead of `wl-summary-write-current-newsgroup'.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 3de5514..d66e062 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2001-05-23  Kenichi OKADA  <okada@opaopa.org>
+
+	* wl-draft.el (wl-draft): use `wl-summary-write-current-folder'
+	instead of `wl-summary-write-current-newsgroup'.
+
 2001-05-19  Masahiro MURATA  <muse@ba2.so-net.ne.jp>
 
 	* wl-summary.el (wl-summary-auto-select-msg-p): New function.
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index a85b46b..5ae1f9c 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -1307,7 +1307,7 @@ If optional argument is non-nil, current draft buffer is killed"
     (if (or (eq wl-draft-reply-buffer-style 'full)
 	    (eq this-command 'wl-draft)
 	    (eq this-command 'wl-summary-write)
-	    (eq this-command 'wl-summary-write-current-newsgroup))
+	    (eq this-command 'wl-summary-write-current-folder))
 	(delete-other-windows))
     (auto-save-mode -1)
     (wl-draft-mode)