diff options
| author | Richard M. Stallman | 2002-07-27 19:01:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2002-07-27 19:01:40 +0000 |
| commit | 347a0e237dd3f3d248bebcd1baeadf2326316c71 (patch) | |
| tree | fb0873687be230eb1550e77686303f2d1e24bcac | |
| parent | 4e361664e6dcf20d902baa41dbd65dd0ed60c906 (diff) | |
| download | emacs-347a0e237dd3f3d248bebcd1baeadf2326316c71.tar.gz emacs-347a0e237dd3f3d248bebcd1baeadf2326316c71.zip | |
(diary-rosh-hodesh): Cons MARK on in the third case.
| -rw-r--r-- | lisp/calendar/cal-hebrew.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/calendar/cal-hebrew.el b/lisp/calendar/cal-hebrew.el index 9bd3886eb42..4d68a75b476 100644 --- a/lisp/calendar/cal-hebrew.el +++ b/lisp/calendar/cal-hebrew.el | |||
| @@ -1008,7 +1008,8 @@ use when highlighting the day in the calendar." | |||
| 1008 | (aref calendar-day-name-array | 1008 | (aref calendar-day-name-array |
| 1009 | (% (- 30 h-day) 7)))))) | 1009 | (% (- 30 h-day) 7)))))) |
| 1010 | (if (and (= h-day 29) (/= h-month 6)) | 1010 | (if (and (= h-day 29) (/= h-month 6)) |
| 1011 | (cons (format "Erev Rosh Hodesh %s" | 1011 | (cons mark |
| 1012 | (format "Erev Rosh Hodesh %s" | ||
| 1012 | (aref h-month-names | 1013 | (aref h-month-names |
| 1013 | (if (= h-month | 1014 | (if (= h-month |
| 1014 | (hebrew-calendar-last-month-of-year | 1015 | (hebrew-calendar-last-month-of-year |