2 files changed, 4 insertions, 2 deletions

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."