From cdbcbc6a795bb7bacd9c1a6d9234d171605bfcd4 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 9 Aug 2005 11:30:36 +0000 Subject: [PATCH] (calendar-mode-map): Bind < and > usefully. --- lisp/calendar/calendar.el | 2 ++ 1 file changed, 2 insertions(+) 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." calendar-mode-map global-map) (setq l (cdr l)))) (define-key calendar-mode-map "-" 'negative-argument) + (define-key calendar-mode-map ">" 'scroll-calendar-right) (define-key calendar-mode-map "\C-x>" 'scroll-calendar-right) (define-key calendar-mode-map [prior] 'scroll-calendar-right-three-months) (define-key calendar-mode-map "\ev" 'scroll-calendar-right-three-months) + (define-key calendar-mode-map "<" 'scroll-calendar-left) (define-key calendar-mode-map "\C-x<" 'scroll-calendar-left) (define-key calendar-mode-map [next] 'scroll-calendar-left-three-months) (define-key calendar-mode-map "\C-v" 'scroll-calendar-left-three-months) -- 2.39.2