(generate-calendar-month): Doc fix.

2 files changed, 7 insertions, 4 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 77460c0fe7f..9af455ffa26 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-01-24  Richard M. Stallman  <rms@gnu.org>
+
+        * calendar/calendar.el (generate-calendar-month): Doc fix.
+
 2002-01-23  Richard M. Stallman  <rms@gnu.org>
 
         * play/tetris.el: (tetris): New defgroup.
diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el
index 7a4879f9f08..af8b1aeed2b 100644
--- a/lisp/calendar/calendar.el
+++ b/lisp/calendar/calendar.el
@@ -1828,10 +1828,9 @@ 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 in the buffer starting at the line on 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."
+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."
   (let* ((blank-days;; at start of month
           (mod
            (- (calendar-day-of-week (list month 1 year))