diff options
| author | Richard M. Stallman | 1997-04-11 02:35:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-04-11 02:35:34 +0000 |
| commit | 5cb9391022bac2eb99a075f4f4fd0dd506c9b721 (patch) | |
| tree | 413bf63700c05e2295ffbad1c0d88ce08020e319 | |
| parent | 7801463cd5daf12a04e7b480b65b61db7c5a6386 (diff) | |
| download | emacs-5cb9391022bac2eb99a075f4f4fd0dd506c9b721.tar.gz emacs-5cb9391022bac2eb99a075f4f4fd0dd506c9b721.zip | |
(diary-islamic-date): Use `date'.
| -rw-r--r-- | lisp/calendar/cal-islam.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calendar/cal-islam.el b/lisp/calendar/cal-islam.el index a8e038e52eb..1949a6b48dd 100644 --- a/lisp/calendar/cal-islam.el +++ b/lisp/calendar/cal-islam.el | |||
| @@ -164,7 +164,7 @@ Driven by the variable `calendar-date-display-form'." | |||
| 164 | 164 | ||
| 165 | (defun diary-islamic-date () | 165 | (defun diary-islamic-date () |
| 166 | "Islamic calendar equivalent of date diary entry." | 166 | "Islamic calendar equivalent of date diary entry." |
| 167 | (let ((i (calendar-islamic-date-string (calendar-cursor-to-date t)))) | 167 | (let ((i (calendar-islamic-date-string date))) |
| 168 | (if (string-equal i "") | 168 | (if (string-equal i "") |
| 169 | "Date is pre-Islamic" | 169 | "Date is pre-Islamic" |
| 170 | (format "Islamic date (until sunset): %s" i)))) | 170 | (format "Islamic date (until sunset): %s" i)))) |