From cca1dde04dfc3298c71b6446e5884a6e786120f2 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 27 Jul 2007 06:15:40 +0000 Subject: (cal-menu-scroll-menu, cal-menu-global-mouse-menu): Use new names. --- lisp/calendar/cal-menu.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'lisp/calendar') diff --git a/lisp/calendar/cal-menu.el b/lisp/calendar/cal-menu.el index 40cf158dcd6..5da73d26d4e 100644 --- a/lisp/calendar/cal-menu.el +++ b/lisp/calendar/cal-menu.el @@ -140,11 +140,11 @@ (defconst cal-menu-scroll-menu '("Scroll" - ["Forward 1 Month" scroll-calendar-left] - ["Forward 3 Months" scroll-calendar-left-three-months] + ["Forward 1 Month" calendar-scroll-left] + ["Forward 3 Months" calendar-scroll-left-three-months] ["Forward 1 Year" "4\C-v"] - ["Backward 1 Month" scroll-calendar-right] - ["Backward 3 Months" scroll-calendar-right-three-months] + ["Backward 1 Month" calendar-scroll-right] + ["Backward 3 Months" calendar-scroll-right-three-months] ["Backward 1 Year" "4\ev"])) (defun cal-menu-x-popup-menu (position menu) @@ -459,8 +459,8 @@ The output is in landscape format, one month to a page." (easy-menu-define cal-menu-global-mouse-menu nil "Menu bound to a mouse event, not specific to the mouse-click location." '("Calendar" - ["Scroll forward" scroll-calendar-left-three-months] - ["Scroll backward" scroll-calendar-right-three-months] + ["Scroll forward" calendar-scroll-left-three-months] + ["Scroll backward" calendar-scroll-right-three-months] ["Mark diary entries" mark-diary-entries] ["List holidays" list-calendar-holidays] ["Mark holidays" mark-calendar-holidays] -- cgit v1.2.1