mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-02 11:21:42 +00:00
Code Issues Releases Activity

(rmail-mode-map): Add explicit keybinding for rmail-resend in the menu.

Browse Source
This commit is contained in:
Glenn Morris 2009-03-01 00:56:18 +00:00
parent b61324c301
commit 017166cefc
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -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)

4
lisp/mail/rmail.el
View File

@ -966,6 +966,7 @@ The buffer is expected to be narrowed to just the header of the message."
(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 @@ The buffer is expected to be narrowed to just the header of the message."
'("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 @@ original message into it."
(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)