diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2000-06-26 13:09:24 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2000-06-26 13:09:24 +0000 |
| commit | b2df30a65dc2a83779393836f38e8bcd870955a1 (patch) | |
| tree | 6a0443409d2d5a010e0993ee120bb5b83bb5e594 /lisp | |
| parent | 98c602effb0271d36ec2ffae257d9bc9df628f8f (diff) | |
| download | emacs-b2df30a65dc2a83779393836f38e8bcd870955a1.tar.gz | |
(menu-bar-tools-menu): Call read-mail-command
interactively.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/menu-bar.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index e3adc6f4f65..875a8758062 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -688,7 +688,9 @@ Do the same for the keys of the same name." '(menu-item "Send Mail" compose-mail :help "Send a mail message")) (define-key menu-bar-tools-menu [rmail] - '(menu-item "Read Mail" read-mail-command + '(menu-item "Read Mail" (lambda () + (interactive) + (call-interactively read-mail-command)) :help "Read your mail and reply to it")) (define-key menu-bar-tools-menu [gnus] '(menu-item "Read Net News" gnus |