2205 |
calendar-mode-map global-map) |
calendar-mode-map global-map) |
2206 |
(setq l (cdr l)))) |
(setq l (cdr l)))) |
2207 |
(define-key calendar-mode-map "-" 'negative-argument) |
(define-key calendar-mode-map "-" 'negative-argument) |
2208 |
|
(define-key calendar-mode-map ">" 'scroll-calendar-right) |
2209 |
(define-key calendar-mode-map "\C-x>" 'scroll-calendar-right) |
(define-key calendar-mode-map "\C-x>" 'scroll-calendar-right) |
2210 |
(define-key calendar-mode-map [prior] 'scroll-calendar-right-three-months) |
(define-key calendar-mode-map [prior] 'scroll-calendar-right-three-months) |
2211 |
(define-key calendar-mode-map "\ev" 'scroll-calendar-right-three-months) |
(define-key calendar-mode-map "\ev" 'scroll-calendar-right-three-months) |
2212 |
|
(define-key calendar-mode-map "<" 'scroll-calendar-left) |
2213 |
(define-key calendar-mode-map "\C-x<" 'scroll-calendar-left) |
(define-key calendar-mode-map "\C-x<" 'scroll-calendar-left) |
2214 |
(define-key calendar-mode-map [next] 'scroll-calendar-left-three-months) |
(define-key calendar-mode-map [next] 'scroll-calendar-left-three-months) |
2215 |
(define-key calendar-mode-map "\C-v" 'scroll-calendar-left-three-months) |
(define-key calendar-mode-map "\C-v" 'scroll-calendar-left-three-months) |