# HG changeset patch # User Glenn Morris # Date 1206947303 0 # Node ID 61387f2ed47536f5a8982e3ae834cec2015c5be0 # Parent baad832293a309ee167aaf164d9a5d3ddb04bf4b Comment. diff -r baad832293a3 -r 61387f2ed475 lisp/calendar/cal-julian.el --- a/lisp/calendar/cal-julian.el Mon Mar 31 04:38:58 2008 +0000 +++ b/lisp/calendar/cal-julian.el Mon Mar 31 07:08:23 2008 +0000 @@ -136,7 +136,6 @@ (defvar displayed-month) (defvar displayed-year) -;; FIXME same as hebrew ;;;###holiday-autoload (defun holiday-julian (month day string) "Holiday on MONTH, DAY (Julian) called STRING. @@ -145,6 +144,8 @@ nil if it is not visible in the current calendar window." ;; We need to choose the Julian year associated with month and day ;; that might make them visible. + ;; This is the same as holiday-hebrew, except that the test for + ;; which year to use is different. (let* ((m1 displayed-month) (y1 displayed-year) (m2 displayed-month)