From: Glenn Morris <rgm@gnu.org>
Date: Wed, 26 Mar 2008 03:11:04 +0000 (+0000)
Subject: Require calendar rather than cal-julian.
X-Git-Tag: emacs-pretest-23.0.90~6922
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=282179b2f99bc0edca9928e1ec5675bec0386f8f;p=emacs.git

Require calendar rather than cal-julian.
Autoload calendar-absolute-from-julian.
(calendar-islamic-epoch): Set when compiling.  Doc fix.
---

diff --git a/lisp/calendar/cal-islam.el b/lisp/calendar/cal-islam.el
index e1a6e47ca4b..2819eb7299f 100644
--- a/lisp/calendar/cal-islam.el
+++ b/lisp/calendar/cal-islam.el
@@ -36,15 +36,19 @@
 
 ;;; Code:
 
-(require 'cal-julian)
+(require 'calendar)
 
 (defconst calendar-islamic-month-name-array
   ["Muharram" "Safar" "Rabi I" "Rabi II" "Jumada I" "Jumada II"
    "Rajab" "Sha'ban" "Ramadan" "Shawwal" "Dhu al-Qada" "Dhu al-Hijjah"]
 "Array of strings giving the names of the Islamic months.")
 
-(defconst calendar-islamic-epoch (calendar-absolute-from-julian '(7 16 622))
-  "Absolute date of start of Islamic calendar = August 29, 284 AD (Julian).")
+(eval-and-compile
+  (autoload 'calendar-absolute-from-julian "cal-julian"))
+
+(defconst calendar-islamic-epoch
+  (eval-when-compile (calendar-absolute-from-julian '(7 16 622)))
+  "Absolute date of start of Islamic calendar = July 16, 622 AD (Julian).")
 
 (defun islamic-calendar-leap-year-p (year)
   "Return t if YEAR is a leap year on the Islamic calendar."