From db940e42bfb52cb32fef61c5ebdf8b7ece8d2862 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 8 Mar 2008 20:26:18 +0000 Subject: [PATCH] (calendar-scroll-left, calendar-scroll-right): Doc fix. --- lisp/ChangeLog | 3 +++ lisp/calendar/cal-move.el | 6 ++++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0c82d64f7a9..3dbfdb43f6b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -32,6 +32,9 @@ * calendar/cal-iso.el (calendar-iso-read-args): Doc fix. + * calendar/cal-move.el (calendar-scroll-left, calendar-scroll-right): + Doc fix. + * calendar/cal-persia.el (persian-calendar-month-name-array) (persian-calendar-epoch): Make constants. diff --git a/lisp/calendar/cal-move.el b/lisp/calendar/cal-move.el index 020d6a05530..ec01ef9ca21 100644 --- a/lisp/calendar/cal-move.el +++ b/lisp/calendar/cal-move.el @@ -94,7 +94,8 @@ Movement is forward is ARG is negative." (defun calendar-scroll-left (&optional arg event) "Scroll the displayed calendar left by ARG months. If ARG is negative the calendar is scrolled right. Maintains the relative -position of the cursor with respect to the calendar as well as possible." +position of the cursor with respect to the calendar as well as possible. +EVENT is an event like `last-nonmenu-event'." (interactive (list (prefix-numeric-value current-prefix-arg) last-nonmenu-event)) (unless arg (setq arg 1)) @@ -119,7 +120,8 @@ position of the cursor with respect to the calendar as well as possible." (defun calendar-scroll-right (&optional arg event) "Scroll the displayed calendar window right by ARG months. If ARG is negative the calendar is scrolled left. Maintains the relative -position of the cursor with respect to the calendar as well as possible." +position of the cursor with respect to the calendar as well as possible. +EVENT is an event like `last-nonmenu-event'." (interactive (list (prefix-numeric-value current-prefix-arg) last-nonmenu-event)) (calendar-scroll-left (- (or arg 1)) event)) -- 2.39.2