Mercurial > emacs
changeset 17796:dd8043525cd9
entry for expand-mail-aliases
| author | Simon Marshall <simon@gnu.org> |
|---|---|
| date | Wed, 14 May 1997 07:26:32 +0000 |
| parents | 41b7d56b62fb |
| children | 7faea977229c |
| files | lisp/mail/sendmail.el |
| diffstat | 1 files changed, 10 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/sendmail.el Wed May 14 05:47:07 1997 +0000 +++ b/lisp/mail/sendmail.el Wed May 14 07:26:32 1997 +0000 @@ -445,6 +445,9 @@ (define-key mail-mode-map [menu-bar mail signature] '("Insert Signature" . mail-signature)) +(define-key mail-mode-map [menu-bar mail mail-sep] + '("--")) + (define-key mail-mode-map [menu-bar mail cancel] '("Cancel" . mail-dont-send)) @@ -457,14 +460,17 @@ (define-key mail-mode-map [menu-bar headers] (cons "Headers" (make-sparse-keymap "Move to Header"))) -(define-key mail-mode-map [menu-bar headers reply-to] - '("Reply-To" . mail-reply-to)) +(define-key mail-mode-map [menu-bar headers text] + '("Text" . mail-text)) + +(define-key mail-mode-map [menu-bar headers expand-aliases] + '("Expand Aliases" . expand-mail-aliases)) (define-key mail-mode-map [menu-bar headers sent-via] '("Sent Via" . mail-sent-via)) -(define-key mail-mode-map [menu-bar headers text] - '("Text" . mail-text)) +(define-key mail-mode-map [menu-bar headers reply-to] + '("Reply-To" . mail-reply-to)) (define-key mail-mode-map [menu-bar headers bcc] '("Bcc" . mail-bcc))