[Emacs-diffs] Changes to emacs/lisp/calendar/cal-coptic.el,v

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       08/03/08 19:50:37

Index: cal-coptic.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/calendar/cal-coptic.el,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -b -r1.25 -r1.26
--- cal-coptic.el       8 Mar 2008 04:26:21 -0000       1.25
+++ cal-coptic.el       8 Mar 2008 19:50:37 -0000       1.26
@@ -167,6 +167,9 @@
                (lambda (x) (and (< 0 x) (<= x last))))))
     (list (list month day year))))
 
+(defvar date)
+
+;; To be called from list-sexp-diary-entries, where DATE is bound.
 (defun diary-coptic-date ()
   "Coptic calendar equivalent of date diary entry."
   (let ((f (calendar-coptic-date-string date)))
@@ -230,8 +233,6 @@
                        (calendar-absolute-from-ethiopic date)))
   (or noecho (calendar-print-ethiopic-date)))
 
-(defvar date)
-
 ;; To be called from list-sexp-diary-entries, where DATE is bound.
 (defun diary-ethiopic-date ()
   "Ethiopic calendar equivalent of date diary entry."