From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 9 Aug 2005 11:30:36 +0000 (+0000)
Subject: (calendar-mode-map): Bind < and > usefully.
X-Git-Tag: emacs-pretest-22.0.90~7710
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cdbcbc6a795bb7bacd9c1a6d9234d171605bfcd4;p=emacs.git

(calendar-mode-map): Bind < and > usefully.
---

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)