# HG changeset patch # User Glenn Morris # Date 1205117377 0 # Node ID 6a990f964e22aa026bba2396bea849fd3c6c514b # Parent e31f46e15cac58153aba23814cec45cbb3e8cfef (date, entry, number): Move declarations to where they are needed. diff -r e31f46e15cac -r 6a990f964e22 lisp/calendar/cal-hebrew.el --- a/lisp/calendar/cal-hebrew.el Mon Mar 10 02:47:21 2008 +0000 +++ b/lisp/calendar/cal-hebrew.el Mon Mar 10 02:49:37 2008 +0000 @@ -37,11 +37,8 @@ ;;; Code: -(defvar date) (defvar displayed-month) (defvar displayed-year) -(defvar entry) -(defvar number) (defvar original-date) (require 'calendar) @@ -509,6 +506,8 @@ (declare-function add-to-diary-list "diary-lib" (date string specifier &optional marker globcolor literal)) +(defvar number) ; from diary-list-entries + (defun list-hebrew-diary-entries () "Add any Hebrew date entries from the diary file to `diary-entries-list'. Hebrew date diary entries must be prefaced by `hebrew-diary-entry-symbol' @@ -912,6 +911,8 @@ (display-buffer yahrzeit-buffer) (message "Computing Yahrzeits...done"))) +(defvar date) + (defun diary-hebrew-date () "Hebrew calendar equivalent of date diary entry." (format "Hebrew date (until sunset): %s" (calendar-hebrew-date-string date))) @@ -942,6 +943,8 @@ (format " and %d day%s" day (if (= day 1) "" "s")))))))))) +(defvar entry) + (defun diary-yahrzeit (death-month death-day death-year &optional mark) "Yahrzeit diary entry--entry applies if date is Yahrzeit or the day before. Parameters are DEATH-MONTH, DEATH-DAY, DEATH-YEAR; the diary entry is assumed