Mercurial > emacs
changeset 44366:3ade5e9efe68
(holiday-rosh-hashanah-etc): Spelling correction.
(diary-rosh-hodesh): Spelling correction.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 03 Apr 2002 14:24:36 +0000 |
parents | b990fdae0c3e |
children | c652288e6fb7 |
files | lisp/calendar/cal-hebrew.el |
diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/cal-hebrew.el Wed Apr 03 13:43:47 2002 +0000 +++ b/lisp/calendar/cal-hebrew.el Wed Apr 03 14:24:36 2002 +0000 @@ -345,7 +345,7 @@ (list (calendar-gregorian-from-absolute (+ abs-r-h 19)) "Hol Hamoed Sukkot (fourth day)") (list (calendar-gregorian-from-absolute (+ abs-r-h 20)) - "Hoshannah Rabbah"))) + "Hoshanah Rabbah"))) (output-list (filter-visible-calendar-holidays mandatory))) (if all-hebrew-calendar-holidays @@ -977,9 +977,9 @@ (if (= h-yesterday 30) (format "%s (second day)" this-month) this-month))) - (if (= (% d 7) 6);; Saturday--check for Shabbat Mevarhim + (if (= (% d 7) 6);; Saturday--check for Shabbat Mevarchim (cond ((and (> h-day 22) (/= h-month 6) (= 29 last-day)) - (format "Mevarhim Rosh Hodesh %s (%s)" + (format "Mevarchim Rosh Hodesh %s (%s)" (aref h-month-names (if (= h-month (hebrew-calendar-last-month-of-year @@ -987,7 +987,7 @@ 0 h-month)) (aref calendar-day-name-array (- 29 h-day)))) ((and (< h-day 30) (> h-day 22) (= 30 last-day)) - (format "Mevarhim Rosh Hodesh %s (%s-%s)" + (format "Mevarchim Rosh Hodesh %s (%s-%s)" (aref h-month-names h-month) (if (= h-day 29) "tomorrow"