changeset 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 37cca1d50b6a
children dcbc46826515
files lisp/calendar/calendar.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/calendar.el	Fri May 07 17:34:34 1993 +0000
+++ b/lisp/calendar/calendar.el	Fri May 07 17:40:01 1993 +0000
@@ -1455,6 +1455,10 @@
   (define-key calendar-mode-map "\C-x[" 'calendar-backward-year)
   (define-key calendar-mode-map "\C-f"  'calendar-forward-day)
   (define-key calendar-mode-map "\C-n"  'calendar-forward-week)
+  (define-key calendar-mode-map [left]  'calendar-backward-day)
+  (define-key calendar-mode-map [up]    'calendar-backward-week)
+  (define-key calendar-mode-map [right] 'calendar-forward-day)
+  (define-key calendar-mode-map [down]  'calendar-forward-week)
   (define-key calendar-mode-map "\e}"   'calendar-forward-month)
   (define-key calendar-mode-map "\C-x]" 'calendar-forward-year)
   (define-key calendar-mode-map "\C-a"  'calendar-beginning-of-week)