# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1235868978 0
# Node ID 9ea8a3661105a2c35cdcf36f9ce8eb4be2fb5ba3
# Parent  824362943376025a942e512c5eddf99af7696e36
(rmail-mode-map): Add explicit keybinding for rmail-resend in the menu.

diff -r 824362943376 -r 9ea8a3661105 lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Mar 01 00:48:51 2009 +0000
+++ b/lisp/ChangeLog	Sun Mar 01 00:56:18 2009 +0000
@@ -1,5 +1,8 @@
 2009-03-01  Glenn Morris  <rgm@gnu.org>
 
+	* mail/rmail.el (rmail-mode-map): Add explicit keybinding for
+	rmail-resend in the menu.
+
 	* files.el (confirm-nonexistent-file-or-buffer): `other' must be last
 	custom choice.  (Bug#2506)
 
diff -r 824362943376 -r 9ea8a3661105 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Sun Mar 01 00:48:51 2009 +0000
+++ b/lisp/mail/rmail.el	Sun Mar 01 00:56:18 2009 +0000
@@ -966,6 +966,7 @@
     (define-key map "d"      'rmail-delete-forward)
     (define-key map "\C-d"   'rmail-delete-backward)
     (define-key map "e"      'rmail-edit-current-message)
+    ;; If you change this, change the rmail-resend menu-item's :keys.
     (define-key map "f"      'rmail-forward)
     (define-key map "g"      'rmail-get-new-mail)
     (define-key map "h"      'rmail-summary)
@@ -1078,7 +1079,7 @@
       '("Continue" . rmail-continue))
 
     (define-key map [menu-bar mail resend]
-      '("Re-send..." . rmail-resend))
+    '(menu-item "Resend..." rmail-resend :keys "C-u f"))
 
     (define-key map [menu-bar mail forward]
       '("Forward" . rmail-forward))
@@ -3282,6 +3283,7 @@
   (interactive)
   (rmail-start-mail nil nil nil nil nil rmail-view-buffer))
 
+;; FIXME should complain if there is nothing to continue.
 (defun rmail-continue ()
   "Continue composing outgoing message previously being composed."
   (interactive)