diff lisp/calendar/diary-lib.el @ 112187:e371b9b5f88f

* lisp/calendar/diary-lib.el (diary-mode): Refresh *Calendar* after refreshing the diary buffer.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 10 Jan 2011 18:31:47 -0500
parents c00190a8c8ef
children
line wrap: on
line diff
--- a/lisp/calendar/diary-lib.el	Mon Jan 10 17:05:42 2011 -0500
+++ b/lisp/calendar/diary-lib.el	Mon Jan 10 18:31:47 2011 -0500
@@ -1,7 +1,7 @@
 ;;; diary-lib.el --- diary functions
 
 ;; Copyright (C) 1989, 1990, 1992, 1993, 1994, 1995, 2001, 2002, 2003,
-;;   2004, 2005, 2006, 2007, 2008, 2009, 2010
+;;   2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
 ;;   Free Software Foundation, Inc.
 
 ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu>
@@ -2346,6 +2346,9 @@
        '(diary-font-lock-keywords t))
   (add-to-invisibility-spec '(diary . nil))
   (add-hook 'after-save-hook 'diary-redraw-calendar nil t)
+  ;; In case the file was modified externally, refresh the calendar
+  ;; after refreshing the diary buffer.
+  (add-hook 'after-revert-hook 'diary-redraw-calendar nil t)
   (if diary-header-line-flag
       (setq header-line-format diary-header-line-format)))