(french-calendar-month-name-array)

(french-calendar-day-name-array, french-calendar-special-days-array):
Add doc strings.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ed65a893f3ad9d6b9855f8eb98011872f8234627..05886da083daaac5c65f9a5aa61e5bf52427847e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -26,6 +26,10 @@
 
        * calendar/cal-coptic.el (coptic-name): Add doc string.
 
+       * calendar/cal-french.el (french-calendar-month-name-array)
+       (french-calendar-day-name-array, french-calendar-special-days-array):
+       Add doc strings.
+
        * calendar/cal-iso.el (calendar-iso-read-args): Doc fix.
 
        * calendar/cal-persia.el (persian-calendar-month-name-array)

diff --git a/lisp/calendar/cal-french.el b/lisp/calendar/cal-french.el
index 1a537dac645f994686cefc4709b990c68abdb362..4918eea045be3ebae387b9b0b62568af34737c65 100644 (file)
--- a/lisp/calendar/cal-french.el
+++ b/lisp/calendar/cal-french.el
@@ -73,14 +73,17 @@
    "de la Re'volution"])
 
 (defun french-calendar-month-name-array ()
+  "Return the array of month names, depending on whether accents are available."
   (if (french-calendar-accents)
       french-calendar-multibyte-month-name-array
     french-calendar-month-name-array))
 
 (defun french-calendar-day-name-array ()
+  "Return the array of day names."
   french-calendar-day-name-array)
 
 (defun french-calendar-special-days-array ()
+  "Return the special day names, depending on whether accents are available."
   (if (french-calendar-accents)
       french-calendar-multibyte-special-days-array
     french-calendar-special-days-array))