From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 28 Aug 1999 15:18:39 +0000 (+0000)
Subject: (calendar-move-hook): New hook.
X-Git-Tag: emacs-pretest-21.0.90~7031
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5c9705e5a99642975a100a8123a97b56aafbc91c;p=emacs.git

(calendar-move-hook): New hook.
---

diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el
index 4a4690ec3f3..a8132311dfb 100644
--- a/lisp/calendar/calendar.el
+++ b/lisp/calendar/calendar.el
@@ -337,6 +337,18 @@ functions that move by days and weeks."
   :type 'hook
   :group 'calendar-hooks)
 
+;;;###autoload
+(defcustom calendar-move-hook nil
+  "*List of functions called whenever the cursor moves in the calendar.
+
+For example, 
+
+  (add-hook 'calendar-move-hook (lambda () (view-diary-entries 1)))
+
+redisplays the diary for whatever date the cursor is moved to."
+  :type 'hook
+  :group 'calendar-hooks)
+
 ;;;###autoload
 (defcustom diary-file "~/diary"
   "*Name of the file in which one's personal diary of dates is kept.