# HG changeset patch
# User Edward M. Reingold <reingold@emr.cs.iit.edu>
# Date 909000187 0
# Node ID 37ae25c77df0b864182b45f21c0da5026eb6562c
# Parent  8fd3e2d95a519365a79ece0e75c5503af09a24fa
Add doc strings CORRECTLY!

diff -r 8fd3e2d95a51 -r 37ae25c77df0 lisp/calendar/calendar.el
--- a/lisp/calendar/calendar.el	Wed Oct 21 18:39:15 1998 +0000
+++ b/lisp/calendar/calendar.el	Wed Oct 21 20:03:07 1998 +0000
@@ -2335,13 +2335,13 @@
 	  (t (substring string 0 width)))))
 
 (defvar calendar-day-name-array
-  "Array of capitalized strings giving, in order, the day names."
-  ["Sunday" "Monday" "Tuesday" "Wednesday" "Thursday" "Friday" "Saturday"])
+  ["Sunday" "Monday" "Tuesday" "Wednesday" "Thursday" "Friday" "Saturday"]
+  "Array of capitalized strings giving, in order, the day names.")
 
 (defvar calendar-month-name-array
-  "Array of capitalized strings giving, in order, the month names."
   ["January" "February" "March"     "April"   "May"      "June"
-   "July"    "August"   "September" "October" "November" "December"])
+   "July"    "August"   "September" "October" "November" "December"]
+  "Array of capitalized strings giving, in order, the month names.")
 
 (defun calendar-make-alist (sequence &optional start-index filter)
   "Make an assoc list corresponding to SEQUENCE.