mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

(diary-islamic-date): Use `date'.

Browse Source
This commit is contained in:
Richard M. Stallman 1997-04-11 02:35:34 +00:00
parent 7801463cd5
commit 5cb9391022
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/calendar/cal-islam.el
View File

@ -164,7 +164,7 @@ Driven by the variable `calendar-date-display-form'."
(defun diary-islamic-date ()
"Islamic calendar equivalent of date diary entry."
(let ((i (calendar-islamic-date-string (calendar-cursor-to-date t))))
(let ((i (calendar-islamic-date-string date)))
(if (string-equal i "")
"Date is pre-Islamic"
(format "Islamic date (until sunset): %s" i))))