Mercurial > emacs
comparison lisp/calendar/calendar.el @ 2688:a906a3882b9f
(calendar-mode-map): Add arrow key bindings.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Fri, 07 May 1993 17:40:01 +0000 |
parents | fc7b8160bcc9 |
children | be10f559ebe4 |
comparison
equal
deleted
inserted
replaced
2687:37cca1d50b6a | 2688:a906a3882b9f |
---|---|
1453 (define-key calendar-mode-map "\C-p" 'calendar-backward-week) | 1453 (define-key calendar-mode-map "\C-p" 'calendar-backward-week) |
1454 (define-key calendar-mode-map "\e{" 'calendar-backward-month) | 1454 (define-key calendar-mode-map "\e{" 'calendar-backward-month) |
1455 (define-key calendar-mode-map "\C-x[" 'calendar-backward-year) | 1455 (define-key calendar-mode-map "\C-x[" 'calendar-backward-year) |
1456 (define-key calendar-mode-map "\C-f" 'calendar-forward-day) | 1456 (define-key calendar-mode-map "\C-f" 'calendar-forward-day) |
1457 (define-key calendar-mode-map "\C-n" 'calendar-forward-week) | 1457 (define-key calendar-mode-map "\C-n" 'calendar-forward-week) |
1458 (define-key calendar-mode-map [left] 'calendar-backward-day) | |
1459 (define-key calendar-mode-map [up] 'calendar-backward-week) | |
1460 (define-key calendar-mode-map [right] 'calendar-forward-day) | |
1461 (define-key calendar-mode-map [down] 'calendar-forward-week) | |
1458 (define-key calendar-mode-map "\e}" 'calendar-forward-month) | 1462 (define-key calendar-mode-map "\e}" 'calendar-forward-month) |
1459 (define-key calendar-mode-map "\C-x]" 'calendar-forward-year) | 1463 (define-key calendar-mode-map "\C-x]" 'calendar-forward-year) |
1460 (define-key calendar-mode-map "\C-a" 'calendar-beginning-of-week) | 1464 (define-key calendar-mode-map "\C-a" 'calendar-beginning-of-week) |
1461 (define-key calendar-mode-map "\C-e" 'calendar-end-of-week) | 1465 (define-key calendar-mode-map "\C-e" 'calendar-end-of-week) |
1462 (define-key calendar-mode-map "\ea" 'calendar-beginning-of-month) | 1466 (define-key calendar-mode-map "\ea" 'calendar-beginning-of-month) |