procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(calendar-mouse-2-date-menu): Put moon phase here.

Browse source 
(calendar-mode-map): Delete from here.
This commit is contained in:
Richard M. Stallman 1994-06-14 19:50:14 +00:00
parent 716acfce85
commit d95f5c9740
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/calendar/cal-menu.el
View file

@ -41,9 +41,6 @@
(defvar calendar-mouse-3-map (make-sparse-keymap "Calendar"))
(define-key calendar-mode-map [down-mouse-3] calendar-mouse-3-map)
(define-key calendar-mode-map [menu-bar moon]
'("Moon" . calendar-phases-of-moon))
(define-key calendar-mode-map [menu-bar diary]
(cons "Diary" (make-sparse-keymap "Diary")))
@ -280,6 +277,7 @@ ERROR is t, otherwise just returns nil."
(list "Menu"
(list
(calendar-date-string date t t)
'("Moon phase" . calendar-phases-of-moon)
'("Diary entries" . calendar-mouse-view-diary-entries)
'("Holidays" . calendar-mouse-holidays)
'("Mark date" . calendar-mouse-set-mark)