mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-20 03:47:34 +00:00
(rmail-mode-map): Add menu item for
rmail-output-body-to-file and put it on w.
This commit is contained in:
parent
a24de13400
commit
5eb9cf9777
1 changed files with 4 additions and 1 deletions
|
|
@ -527,7 +527,7 @@ Note: it means the file has no messages in it.\n\^_")))
|
|||
(define-key rmail-mode-map "\es" 'rmail-search)
|
||||
(define-key rmail-mode-map "t" 'rmail-toggle-header)
|
||||
(define-key rmail-mode-map "u" 'rmail-undelete-previous-message)
|
||||
(define-key rmail-mode-map "w" 'rmail-edit-current-message)
|
||||
(define-key rmail-mode-map "w" 'rmail-output-body-to-file)
|
||||
(define-key rmail-mode-map "x" 'rmail-expunge)
|
||||
(define-key rmail-mode-map "." 'rmail-beginning-of-message)
|
||||
(define-key rmail-mode-map "<" 'rmail-first-message)
|
||||
|
|
@ -557,6 +557,9 @@ Note: it means the file has no messages in it.\n\^_")))
|
|||
(define-key rmail-mode-map [menu-bar classify output-menu]
|
||||
nil)
|
||||
|
||||
(define-key rmail-mode-map [menu-bar classify output-body]
|
||||
'("Output body to file..." . rmail-output-body-to-file))
|
||||
|
||||
(define-key rmail-mode-map [menu-bar classify output-inbox]
|
||||
'("Output (inbox)..." . rmail-output))
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue