Function: holiday-hebrew-hanukkah
holiday-hebrew-hanukkah is a byte-compiled function defined in
cal-hebrew.el.gz.
Signature
(holiday-hebrew-hanukkah &optional ALL)
Documentation
List of dates related to Hanukkah, as visible in calendar window.
Shows only Hanukkah, unless calendar-hebrew-all-holidays-flag or ALL
is non-nil.
Source Code
;; Defined in /usr/src/emacs/lisp/calendar/cal-hebrew.el.gz
;;;###holiday-autoload
(defun holiday-hebrew-hanukkah (&optional all)
"List of dates related to Hanukkah, as visible in calendar window.
Shows only Hanukkah, unless `calendar-hebrew-all-holidays-flag' or ALL
is non-nil."
(let ((years (calendar-month-visible-p 11 1))
;; The last year should be considered if Jan is visible.
(y (calendar-month-visible-p 1)))
(if (and y (not (member (1- y) years)))
(push (1- y) years))
(holiday-filter-visible-calendar
(mapcan (lambda (y) (holiday-hebrew-hanukkah-1 y all)) years))))