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

(cal-menu-sunmoon-menu): Rename from cal-menu-moon-menu. Add

Browse source 
calendar-sunrise-sunset-month.
(cal-menu-global-mouse-menu): Add calendar-sunrise-sunset-month.

(cal-menu-goto-menu): Tweak menu name.
This commit is contained in:
Glenn Morris 2008-06-26 22:29:15 +00:00
parent 5c4e164108
commit 70e420e303
1 changed files with 8 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -32,11 +32,12 @@
(require 'calendar)
(defconst cal-menu-moon-menu
'("Moon"
(defconst cal-menu-sunmoon-menu
'("Sun/Moon"
["Lunar Phases" calendar-phases-of-moon]
["Sunrise/sunset for cursor date" calendar-sunrise-sunset])
"Key map for \"Moon\" menu in the calendar.")
["Sunrise/sunset for cursor date" calendar-sunrise-sunset]
["Sunrise/sunset for cursor month" calendar-sunrise-sunset-month])
"Key map for \"Sun/Moon\" menu in the calendar.")
(defconst cal-menu-diary-menu
'("Diary"
@ -111,7 +112,7 @@
"Key map for \"Holidays\" menu in the calendar.")
(defconst cal-menu-goto-menu
'("Go To"
'("Goto"
["Today" calendar-goto-today]
["Beginning of Week" calendar-beginning-of-week]
["End of Week" calendar-end-of-week]
@ -140,7 +141,7 @@
["Next Round" calendar-mayan-next-round-date]
["Previous Round" calendar-mayan-previous-round-date])
["French Date" calendar-french-goto-date])
"Key map for \"Go To\" menu in the calendar.")
"Key map for \"Goto\" menu in the calendar.")
(defconst cal-menu-scroll-menu
'("Scroll"
@ -246,6 +247,7 @@ is non-nil."
["Mark holidays" calendar-mark-holidays]
["Unmark" calendar-unmark]
["Lunar phases" calendar-phases-of-moon]
["Sunrise times for month" calendar-sunrise-sunset-month]
["Show diary" diary-show-all-entries]
["Exit calendar" calendar-exit]))