From: Glenn Morris <rgm@gnu.org>
Date: Thu, 26 Jun 2008 05:02:04 +0000 (+0000)
Subject: (cal-menu-context-mouse-menu): Add some :keys.
X-Git-Tag: emacs-pretest-23.0.90~4480
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8da2243fe57179ed0d4e47f6afbffc828d5e0ce4;p=emacs.git

(cal-menu-context-mouse-menu): Add some :keys.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index df9749c1d94..194b58aa093 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -40,6 +40,7 @@
 	* calendar/cal-menu.el (cal-menu-moon-menu, cal-menu-diary-menu)
 	(cal-menu-holidays-menu, cal-menu-goto-menu, cal-menu-scroll-menu):
 	Add doc strings.
+	(cal-menu-context-mouse-menu): Add some :keys.
 
 2008-06-26  Stefan Monnier  <monnier@iro.umontreal.ca>
 
diff --git a/lisp/calendar/cal-menu.el b/lisp/calendar/cal-menu.el
index b08f9f1f488..f3a69bd581f 100644
--- a/lisp/calendar/cal-menu.el
+++ b/lisp/calendar/cal-menu.el
@@ -231,9 +231,10 @@ is non-nil."
     ("Write HTML calendar"
      ["For selected month" cal-html-cursor-month]
      ["For selected year" cal-html-cursor-year])
-    ["Diary entries" calendar-mouse-view-diary-entries]
+    ["Diary entries" calendar-mouse-view-diary-entries :keys "d"]
     ["Insert diary entry" diary-insert-entry]
-    ["Other diary file entries" calendar-mouse-view-other-diary-entries]))
+    ["Other diary file entries" calendar-mouse-view-other-diary-entries
+     :keys "D"]))
 
 (easy-menu-define cal-menu-global-mouse-menu nil
   "Menu bound to a mouse event, not specific to the mouse-click location."