From: Glenn Morris <rgm@gnu.org>
Date: Sat, 8 Mar 2008 20:18:49 +0000 (+0000)
Subject: (french-calendar-month-name-array)
X-Git-Tag: emacs-pretest-23.0.90~7352
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a4723d1f9cf5c7af49a5f9279cf070733f9db8d6;p=emacs.git

(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 ed65a893f3a..05886da083d 100644
--- 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 1a537dac645..4918eea045b 100644
--- 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))