[Emacs-diffs] Changes to emacs/lisp/calendar/lunar.el,v

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       08/03/08 20:35:51

Index: lunar.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/calendar/lunar.el,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -b -r1.32 -r1.33
--- lunar.el    8 Mar 2008 03:48:20 -0000       1.32
+++ lunar.el    8 Mar 2008 20:35:51 -0000       1.33
@@ -224,8 +224,7 @@
 ;;;###autoload
 (defun phases-of-moon (&optional arg)
   "Display the quarters of the moon for last month, this month, and next month.
-If called with an optional prefix argument, prompts for month and year.
-
+If called with an optional prefix argument ARG, prompts for month and year.
 This function is suitable for execution in a .emacs file."
   (interactive "P")
   (save-excursion
@@ -238,7 +237,6 @@
 
 (defun diary-phases-of-moon (&optional mark)
 "Moon phases diary entry.
-
 An optional parameter MARK specifies a face or single-character string to
 use when highlighting the day in the calendar."
   (let* ((index (* 4
@@ -256,10 +254,8 @@
         (cons mark (concat (lunar-phase-name (car (cdr (cdr phase)))) " "
                 (car (cdr phase)))))))
 
-
 ;;  For the Chinese calendar the calculations for the new moon need to be more
 ;;  accurate than those above, so we use more terms in the approximation.
-
 (defun lunar-new-moon-time (k)
   "Astronomical (Julian) day number of K th new moon."
   (let* ((T (/ k 1236.85))
@@ -368,8 +364,8 @@
        (/ calendar-time-zone 60.0 24.0))))
 
 (defun lunar-new-moon-on-or-after (d)
-  "Astronomical (Julian) day number of first new moon on or after astronomical
-\(Julian) day number d.  The fractional part is the time of day.
+  "Julian day number of first new moon on or after Julian day number D.
+The fractional part is the time of day.
 
 The date and time are local time, including any daylight saving rules,
 as governed by the values of calendar-daylight-savings-starts,