diff options
| author | Richard M. Stallman | 2005-08-09 11:30:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-08-09 11:30:36 +0000 |
| commit | cdbcbc6a795bb7bacd9c1a6d9234d171605bfcd4 (patch) | |
| tree | bea18756441be3ab5a5945e831626485ef1e09bd /lisp | |
| parent | 56b3b16bc224784152e80e08ec60947a858c8b25 (diff) | |
| download | emacs-cdbcbc6a795bb7bacd9c1a6d9234d171605bfcd4.tar.gz emacs-cdbcbc6a795bb7bacd9c1a6d9234d171605bfcd4.zip | |
(calendar-mode-map): Bind < and > usefully.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/calendar/calendar.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el index ada15878f13..3e075b9d6bd 100644 --- a/lisp/calendar/calendar.el +++ b/lisp/calendar/calendar.el | |||
| @@ -2205,9 +2205,11 @@ movement commands will not work correctly." | |||
| 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) |