comparison lisp/calendar/calendar.el @ 90224:2d92f5c9d6ae

Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-78 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 514-518) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 104-105) - Update from CVS
author Miles Bader <miles@gnu.org>
date Fri, 26 Aug 2005 09:51:52 +0000
parents 187d6a1f84f7 8e1886955e26
children fa0da9b57058
comparison
equal deleted inserted replaced
90223:edf295560b5a 90224:2d92f5c9d6ae
2203 (while l 2203 (while l
2204 (substitute-key-definition (car l) 'calendar-not-implemented 2204 (substitute-key-definition (car l) 'calendar-not-implemented
2205 calendar-mode-map global-map) 2205 calendar-mode-map global-map)
2206 (setq l (cdr l)))) 2206 (setq l (cdr l))))
2207 (define-key calendar-mode-map "-" 'negative-argument) 2207 (define-key calendar-mode-map "-" 'negative-argument)
2208 (define-key calendar-mode-map ">" 'scroll-calendar-right)
2208 (define-key calendar-mode-map "\C-x>" 'scroll-calendar-right) 2209 (define-key calendar-mode-map "\C-x>" 'scroll-calendar-right)
2209 (define-key calendar-mode-map [prior] 'scroll-calendar-right-three-months) 2210 (define-key calendar-mode-map [prior] 'scroll-calendar-right-three-months)
2210 (define-key calendar-mode-map "\ev" 'scroll-calendar-right-three-months) 2211 (define-key calendar-mode-map "\ev" 'scroll-calendar-right-three-months)
2212 (define-key calendar-mode-map "<" 'scroll-calendar-left)
2211 (define-key calendar-mode-map "\C-x<" 'scroll-calendar-left) 2213 (define-key calendar-mode-map "\C-x<" 'scroll-calendar-left)
2212 (define-key calendar-mode-map [next] 'scroll-calendar-left-three-months) 2214 (define-key calendar-mode-map [next] 'scroll-calendar-left-three-months)
2213 (define-key calendar-mode-map "\C-v" 'scroll-calendar-left-three-months) 2215 (define-key calendar-mode-map "\C-v" 'scroll-calendar-left-three-months)
2214 (define-key calendar-mode-map "\C-b" 'calendar-backward-day) 2216 (define-key calendar-mode-map "\C-b" 'calendar-backward-day)
2215 (define-key calendar-mode-map "\C-p" 'calendar-backward-week) 2217 (define-key calendar-mode-map "\C-p" 'calendar-backward-week)