Synch up with main trunk.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 042e5bc..21c85ec 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -72,6 +72,11 @@
        (wl-archive-folder): Ditto.
        All other related portions are changed.
 
+2003-07-19  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+       * wl-draft.el (wl-draft-send-confirm): Change message. Now up/down
+       mean move up and down. (suggested by Takashi Kawachi)
+
 2003-07-18  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * wl-acap.el (toplevel): Don't require un-define.

diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index c9aded1..b75cccf 100644 (file)
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -1286,7 +1286,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/j(up)/k(down)> ")
+                   (message "Send current draft? <y/n/j(down)/k(up)> ")
                    (setq answer (let ((cursor-in-echo-area t)) (read-char)))
                    (cond
                     ((or (eq answer ?y)