comparison lisp/calendar/cal-menu.el @ 70634:516e75189437

(calendar-mode-map, calendar-mouse-3-map): Refer to diary-view-entries, diary-list-entries, diary-show-all-entries rather than obsolete aliases.
author Glenn Morris <rgm@gnu.org>
date Sat, 13 May 2006 06:11:29 +0000
parents d38bfc1692a5
children 7a3f13e2dd57 a5812696f7bf
comparison
equal deleted inserted replaced
70633:95f7f08b0a17 70634:516e75189437
83 (define-key calendar-mode-map [menu-bar diary wk] 83 (define-key calendar-mode-map [menu-bar diary wk]
84 '("Insert Weekly" . insert-weekly-diary-entry)) 84 '("Insert Weekly" . insert-weekly-diary-entry))
85 (define-key calendar-mode-map [menu-bar diary ent] 85 (define-key calendar-mode-map [menu-bar diary ent]
86 '("Insert Diary Entry" . insert-diary-entry)) 86 '("Insert Diary Entry" . insert-diary-entry))
87 (define-key calendar-mode-map [menu-bar diary all] 87 (define-key calendar-mode-map [menu-bar diary all]
88 '("Show All" . show-all-diary-entries)) 88 '("Show All" . diary-show-all-entries))
89 (define-key calendar-mode-map [menu-bar diary mark] 89 (define-key calendar-mode-map [menu-bar diary mark]
90 '("Mark All" . mark-diary-entries)) 90 '("Mark All" . mark-diary-entries))
91 (define-key calendar-mode-map [menu-bar diary view] 91 (define-key calendar-mode-map [menu-bar diary view]
92 '("Cursor Date" . diary-view-entries)) 92 '("Cursor Date" . diary-view-entries))
93 (define-key calendar-mode-map [menu-bar diary view] 93 (define-key calendar-mode-map [menu-bar diary view]
614 (and selection (call-interactively selection)))) 614 (and selection (call-interactively selection))))
615 615
616 (define-key calendar-mouse-3-map [exit-calendar] 616 (define-key calendar-mouse-3-map [exit-calendar]
617 '("Exit calendar" . exit-calendar)) 617 '("Exit calendar" . exit-calendar))
618 (define-key calendar-mouse-3-map [show-diary] 618 (define-key calendar-mouse-3-map [show-diary]
619 '("Show diary" . show-all-diary-entries)) 619 '("Show diary" . diary-show-all-entries))
620 (define-key calendar-mouse-3-map [lunar-phases] 620 (define-key calendar-mouse-3-map [lunar-phases]
621 '("Lunar phases" . calendar-phases-of-moon)) 621 '("Lunar phases" . calendar-phases-of-moon))
622 (define-key calendar-mouse-3-map [unmark] 622 (define-key calendar-mouse-3-map [unmark]
623 '("Unmark" . calendar-unmark)) 623 '("Unmark" . calendar-unmark))
624 (define-key calendar-mouse-3-map [mark-holidays] 624 (define-key calendar-mouse-3-map [mark-holidays]