# HG changeset patch # User Richard M. Stallman # Date 744505330 0 # Node ID 7f41b3648380d00f7580a41ee4fe42f2f896794a # Parent 9b4b1220bfe5f7e1a66e4b5ecc2430797c898d0a (diary-display-hook): Change default and fix doc string. (diary-hook): New user variable. (diary-date-forms, calendar-date-display-form): Don't autoload them so the European/American style is decided at load time. diff -r 9b4b1220bfe5 -r 7f41b3648380 lisp/calendar/calendar.el --- a/lisp/calendar/calendar.el Wed Aug 04 23:01:24 1993 +0000 +++ b/lisp/calendar/calendar.el Wed Aug 04 23:02:10 1993 +0000 @@ -378,7 +378,6 @@ "*List of pseudo-patterns describing the European patterns of date used. See the documentation of diary-date-forms for an explanation.") -;;;###autoload (defvar diary-date-forms (if european-calendar-style european-date-diary-pattern @@ -418,7 +417,6 @@ "*Pseudo-pattern governing the way a date appears in the American style. See the documentation of calendar-date-display-forms for an explanation.") -;;;###autoload (defvar calendar-date-display-form (if european-calendar-style european-calendar-display-form @@ -497,17 +495,23 @@ lexicographic order.") ;;;###autoload -(defvar diary-display-hook 'simple-diary-display +(defvar diary-hook nil + "*List of functions called after the display of the diary. +Can be used for appointment notification.") + +;;;###autoload +(defvar diary-display-hook nil "*List of functions that handle the display of the diary. +If nil (the default), `simple-diary-display' will be used. Use `ignore' for no +diary display. Ordinarily, this just displays the diary buffer (with holidays indicated in the mode line), if there are any relevant entries. At the time these functions are called, the variable `diary-entries-list' is a list, in order by date, of all relevant diary entries in the form of ((MONTH DAY YEAR) STRING), where string is the diary entry for the given date. This can be -used, for example, to handle appointment notification, prepare a different -buffer for display (perhaps combined with holidays), or produce hard copy -output. +used, for example, a different buffer for display (perhaps combined with +holidays), or produce hard copy output. A function `fancy-diary-display' is provided as an alternative choice for this hook; this function prepares a special noneditable diary