# HG changeset patch # User Jim Blandy # Date 737840052 0 # Node ID be10f559ebe49e8284c429c95b2a331aba3eddb3 # Parent d9f7768b0d892be595dbcacb6591a9f31facd240 * calendar.el (hebrew-calendar-yahrzeit): Correct error from S-P&E paper in test for Adar I 30 date of death for yahrzeit in a non-leap year when Shevat 29 must be used. diff -r d9f7768b0d89 -r be10f559ebe4 lisp/calendar/calendar.el --- a/lisp/calendar/calendar.el Wed May 19 19:13:31 1993 +0000 +++ b/lisp/calendar/calendar.el Wed May 19 19:34:12 1993 +0000 @@ -2945,11 +2945,11 @@ ((= death-month 13) (calendar-absolute-from-hebrew (list (hebrew-calendar-last-month-of-year year) death-day year))) - ;; If it's the 30th in Adar I and $year$ is not a leap year + ;; If it's the 30th in Adar I and year is not a leap year ;; (so Adar has only 29 days), use the last day in Shevat. ((and (= death-day 30) (= death-month 12) - (not (hebrew-calendar-leap-year-p death-year))) + (not (hebrew-calendar-leap-year-p year))) (calendar-absolute-from-hebrew (list 11 30 year))) ;; In all other cases, use the normal anniversary of the date of death. (t (calendar-absolute-from-hebrew