Function: holiday-bahai-new-year

holiday-bahai-new-year is a byte-compiled function defined in cal-bahai.el.gz.

Signature

(holiday-bahai-new-year)

Documentation

Holiday entry for the Bahá’í New Year, if visible in the calendar window.

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/cal-bahai.el.gz
;;;###holiday-autoload
(defun holiday-bahai-new-year ()
  "Holiday entry for the Bahá’í New Year, if visible in the calendar window."
  (let* ((bahai-year (- displayed-year (1- 1844)))
         (nawruz-date (if (< bahai-year calendar-bahai-reform-year)
                          ;; Pre-reform: always March 21
                          (list 3 21 displayed-year)
                        ;; Post-reform: calculate from equinox
                        (calendar-bahai-nawruz-for-gregorian-year displayed-year))))
    (when (calendar-date-is-visible-p nawruz-date)
      (list (list nawruz-date
                  (format "Bahá’í New Year (Naw-Ruz) %d" bahai-year))))))