From: Eli Zaretskii Date: Mon, 28 Jan 2002 19:23:14 +0000 (+0000) Subject: (generate-calendar-month): Doc fix. X-Git-Tag: ttn-vms-21-2-B4~16928 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f2172a682bfeffeded7a554af7859d796eed605a;p=emacs.git (generate-calendar-month): Doc fix. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c3f9466d294..35ac55867b6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2002-01-28 Eli Zaretskii + + * calendar/calendar.el (generate-calendar-month): Doc fix. + 2002-01-27 Pavel Jan,Bm(Bk * time.el (display-time-mail-directory): New option. diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el index af8b1aeed2b..7caa258d6e7 100644 --- a/lisp/calendar/calendar.el +++ b/lisp/calendar/calendar.el @@ -1828,9 +1828,10 @@ Or, for optional MON, YR." (defun generate-calendar-month (month year indent) "Produce a calendar for MONTH, YEAR on the Gregorian calendar. -The calendar is inserted at the beginning of the buffer, -and is indented INDENT spaces. The indentation is done -by skipping the first INDENT characters on the line, if there are that many." +The calendar is inserted at the top of the buffer in which point is currently +located, but indented INDENT spaces. The indentation is done from the first +character on the line and does not disturb the first INDENT characters on the +line." (let* ((blank-days;; at start of month (mod (- (calendar-day-of-week (list month 1 year))