Function: calendar-islamic-date-string
calendar-islamic-date-string is an autoloaded and byte-compiled
function defined in cal-islam.el.gz.
Signature
(calendar-islamic-date-string &optional DATE)
Documentation
String of Islamic date before sunset of Gregorian DATE.
Returns the empty string if DATE is pre-Islamic.
Defaults to today's date if DATE is not given.
Driven by the variable calendar-date-display-form.
Source Code
;; Defined in /usr/src/emacs/lisp/calendar/cal-islam.el.gz
;;;###cal-autoload
(defun calendar-islamic-date-string (&optional date)
"String of Islamic date before sunset of Gregorian DATE.
Returns the empty string if DATE is pre-Islamic.
Defaults to today's date if DATE is not given.
Driven by the variable `calendar-date-display-form'."
(let ((calendar-month-name-array calendar-islamic-month-name-array)
(islamic-date (calendar-islamic-from-absolute
(calendar-absolute-from-gregorian
(or date (calendar-current-date))))))
(if (< (calendar-extract-year islamic-date) 1)
""
(calendar-date-string islamic-date nil t))))