changeset 86489:997f6a0ad183

(holiday-filter-visible-calendar) (add-to-diary-list, diary-name-pattern) (mark-calendar-days-named): Declare as functions.

--- a/lisp/calendar/cal-hebrew.el	Tue Nov 27 04:12:50 2007 +0000
+++ b/lisp/calendar/cal-hebrew.el	Tue Nov 27 04:13:34 2007 +0000
@@ -301,6 +301,9 @@
             (if (calendar-date-is-visible-p date)
                 (list (list date string))))))))
 
+;; h-r-h-e should be called from holidays code.
+(declare-function holiday-filter-visible-calendar "holidays" (l))
+
 (defun holiday-rosh-hashanah-etc ()
   "List of dates related to Rosh Hashanah, as visible in calendar window."
   (if (or (< displayed-month 8)
@@ -500,6 +503,10 @@
                (calendar-dayname-on-or-before 6 (+ abs-t-a 7)))
               "Shabbat Nahamu"))))))
 
+;; l-h-d-e should be called from diary code.
+(declare-function add-to-diary-list "diary-lib"
+                  (date string specifier &optional marker globcolor literal))
+
 (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'
@@ -661,6 +668,12 @@
                  (mark-visible-calendar-date
                   (calendar-gregorian-from-absolute date)))))))))
 
+(declare-function diary-name-pattern "diary-lib"
+                  (string-array &optional abbrev-array paren))
+
+(declare-function mark-calendar-days-named "diary-lib"
+                  (dayname &optional color))
+
 (defun mark-hebrew-diary-entries ()
   "Mark days in the calendar window that have Hebrew date diary entries.
 Each entry in diary-file (or included files) visible in the calendar window