diff options
| -rw-r--r-- | lisp/calendar/calendar.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el index 342feb971b2..14827bc6319 100644 --- a/lisp/calendar/calendar.el +++ b/lisp/calendar/calendar.el | |||
| @@ -2335,13 +2335,13 @@ rather than a date." | |||
| 2335 | (t (substring string 0 width))))) | 2335 | (t (substring string 0 width))))) |
| 2336 | 2336 | ||
| 2337 | (defvar calendar-day-name-array | 2337 | (defvar calendar-day-name-array |
| 2338 | "Array of capitalized strings giving, in order, the day names." | 2338 | ["Sunday" "Monday" "Tuesday" "Wednesday" "Thursday" "Friday" "Saturday"] |
| 2339 | ["Sunday" "Monday" "Tuesday" "Wednesday" "Thursday" "Friday" "Saturday"]) | 2339 | "Array of capitalized strings giving, in order, the day names.") |
| 2340 | 2340 | ||
| 2341 | (defvar calendar-month-name-array | 2341 | (defvar calendar-month-name-array |
| 2342 | "Array of capitalized strings giving, in order, the month names." | ||
| 2343 | ["January" "February" "March" "April" "May" "June" | 2342 | ["January" "February" "March" "April" "May" "June" |
| 2344 | "July" "August" "September" "October" "November" "December"]) | 2343 | "July" "August" "September" "October" "November" "December"] |
| 2344 | "Array of capitalized strings giving, in order, the month names.") | ||
| 2345 | 2345 | ||
| 2346 | (defun calendar-make-alist (sequence &optional start-index filter) | 2346 | (defun calendar-make-alist (sequence &optional start-index filter) |
| 2347 | "Make an assoc list corresponding to SEQUENCE. | 2347 | "Make an assoc list corresponding to SEQUENCE. |