Mercurial > emacs

changeset 29936:e7232e6e90d7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(menu-bar-tools-menu): Call read-mail-command interactively.
author Gerd Moellmann <gerd@gnu.org>
date Mon, 26 Jun 2000 13:09:24 +0000
parents 1768b7d3e44b
children 693c2c631d72
files lisp/menu-bar.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/menu-bar.el	Mon Jun 26 13:09:11 2000 +0000
+++ b/lisp/menu-bar.el	Mon Jun 26 13:09:24 2000 +0000
@@ -688,7 +688,9 @@
   '(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