From: Glenn Morris Date: Sat, 8 Mar 2008 04:26:44 +0000 (+0000) Subject: Comment. X-Git-Tag: emacs-pretest-23.0.90~7363 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d7af270b439a9daa80f8006f580a4fd2133e5965;p=emacs.git Comment. --- diff --git a/lisp/calendar/cal-china.el b/lisp/calendar/cal-china.el index 1a2f2210f38..f11a692b108 100644 --- a/lisp/calendar/cal-china.el +++ b/lisp/calendar/cal-china.el @@ -45,7 +45,6 @@ ;;; Code: -(defvar date) (defvar displayed-month) (defvar displayed-year) @@ -502,6 +501,9 @@ Echo Chinese date unless NOECHO is t." (make-chinese-month-assoc-list (cdr l)))) (list (cons (int-to-string (car l)) (car l)))))) +(defvar date) + +;; To be called from list-sexp-diary-entries, where DATE is bound. (defun diary-chinese-date () "Chinese calendar equivalent of date diary entry." (format "Chinese date: %s" (calendar-chinese-date-string date)))