# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1174458358 0
# Node ID 6d2ab8b45146dbc4c6a0f3566979f0c56306e409
# Parent  1e01809a040cdb4e839e7b9b021d257629dea983
(diary-set-maybe-redraw): Autoload it.
(diary-display-hook): Add custom :set function.

diff -r 1e01809a040c -r 6d2ab8b45146 lisp/calendar/calendar.el
--- a/lisp/calendar/calendar.el	Wed Mar 21 06:25:47 2007 +0000
+++ b/lisp/calendar/calendar.el	Wed Mar 21 06:25:58 2007 +0000
@@ -770,6 +770,8 @@
   :type 'hook
   :group 'diary)
 
+(autoload 'diary-set-maybe-redraw "diary-lib")
+
 ;;;###autoload
 (defcustom diary-display-hook nil
   "List of functions that handle the display of the diary.
@@ -794,6 +796,8 @@
 diary buffer, set the variable `diary-list-include-blanks' to t."
   :type 'hook
   :options '(fancy-diary-display)
+  :initialize 'custom-initialize-default
+  :set 'diary-set-maybe-redraw
   :group 'diary)
 
 ;;;###autoload