From: Glenn Morris Date: Wed, 26 Mar 2008 03:10:04 +0000 (+0000) Subject: Require calendar rather than cal-julian. X-Git-Tag: emacs-pretest-23.0.90~6924 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dad6b4ee590e419d1cf0b1120915386a0e9117f9;p=emacs.git Require calendar rather than cal-julian. Autoload calendar-absolute-from-julian. (coptic-calendar-epoch): Set when compiling. --- diff --git a/lisp/calendar/cal-coptic.el b/lisp/calendar/cal-coptic.el index d336990311c..de7a68f7d61 100644 --- a/lisp/calendar/cal-coptic.el +++ b/lisp/calendar/cal-coptic.el @@ -36,7 +36,7 @@ ;;; Code: -(require 'cal-julian) +(require 'calendar) ;; Not constants because they get let-bound. @@ -45,7 +45,11 @@ "Bashans" "Baunah" "Abib" "Misra" "al-Nasi"] "Array of the month names in the Coptic calendar.") -(defvar coptic-calendar-epoch (calendar-absolute-from-julian '(8 29 284)) +(eval-and-compile + (autoload 'calendar-absolute-from-julian "cal-julian")) + +(defvar coptic-calendar-epoch + (eval-when-compile (calendar-absolute-from-julian '(8 29 284))) "Absolute date of start of Coptic calendar = August 29, 284 AD (Julian).") (defvar coptic-name "Coptic"