From f2192c6628846385205cebaf32e1102bf1997ba8 Mon Sep 17 00:00:00 2001
From: yoichi <yoichi>
Date: Sun, 30 Mar 2003 07:40:49 +0000
Subject: [PATCH] * wl-draft.el (wl-draft-send-confirm): Display more info
 (advised by Kenichi OKADA <okada@opaopa.org>).

---
 wl/ChangeLog   |    5 +++++
 wl/wl-draft.el |    2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/wl/ChangeLog b/wl/ChangeLog
index ea1ad2e..cf53d05 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2003-03-30  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+	* wl-draft.el (wl-draft-send-confirm): Display more info (advised
+	by Kenichi OKADA <okada@opaopa.org>).
+
 2003-03-28  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
 	* wl-folder.el (wl-folder-open-all): Fix to get proper entity.
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index c546569..f9ed725 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -1254,7 +1254,7 @@ This variable is valid when `wl-interactive-send' has non-nil value."
 		(goto-char (point-min)) ; to show recipients in header
 		(catch 'done
 		  (while t
-		    (message "Send current draft? <y/n> ")
+		    (message "Send current draft? <y/n/j(up)/k(down)> ")
 		    (setq answer (let ((cursor-in-echo-area t)) (read-char)))
 		    (cond
 		     ((or (eq answer ?y)
-- 
1.7.10.4