changeset 93221:546789da9d8f

Require calendar rather than cal-julian. Autoload calendar-absolute-from-julian. (coptic-calendar-epoch): Set when compiling.
author Glenn Morris <rgm@gnu.org>
date Wed, 26 Mar 2008 03:10:04 +0000
parents f59ab0cdc9ba
children 380387e4c93c
files lisp/calendar/cal-coptic.el
diffstat 1 files changed, 6 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/cal-coptic.el	Wed Mar 26 03:09:32 2008 +0000
+++ b/lisp/calendar/cal-coptic.el	Wed Mar 26 03:10:04 2008 +0000
@@ -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"