comparison lisp/calendar/cal-menu.el @ 62577:ffc19ed45d7f

(cal-menu-update): Add separator as a string so that tmm doesn't create a completion entry for it.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 21 May 2005 11:35:56 +0000
parents 794bc6a34084
children 18a818a2ee7c 5b029ff3b08d
comparison
equal deleted inserted replaced
62576:b9c75f9160b9 62577:ffc19ed45d7f
219 (list 'list-holidays i i))) 219 (list 'list-holidays i i)))
220 t) 220 t)
221 l))) 221 l)))
222 (setq l (cons ["Mark Holidays" mark-calendar-holidays t] 222 (setq l (cons ["Mark Holidays" mark-calendar-holidays t]
223 (cons ["Unmark Calendar" calendar-unmark t] 223 (cons ["Unmark Calendar" calendar-unmark t]
224 (cons ["--" '("--") t] l)))) 224 (cons "--" l))))
225 (define-key calendar-mode-map [menu-bar Holidays] 225 (define-key calendar-mode-map [menu-bar Holidays]
226 (cons "Holidays" (easy-menu-create-menu "Holidays" (nreverse l)))) 226 (cons "Holidays" (easy-menu-create-menu "Holidays" (nreverse l))))
227 (define-key calendar-mode-map [menu-bar Holidays separator] 227 (define-key calendar-mode-map [menu-bar Holidays separator]
228 '("--")) 228 '("--"))
229 (define-key calendar-mode-map [menu-bar Holidays today] 229 (define-key calendar-mode-map [menu-bar Holidays today]