* 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 (file)
--- 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 (file)
--- 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)