X-Git-Url: http://cgit.sxemacs.org/?p=syinit;a=blobdiff_plain;f=12-cal-sy.el;h=fdfaa81f7ff28bc0d08c0ed17de6bc88759f53cc;hp=93a798ccc5810a0792004c048d8b75a5d7414d4c;hb=5a9589a97b099c6171488d7176350d9a8d6e670a;hpb=93a2a8136a07ea7da933092df5ca915ae50006c4

diff --git a/12-cal-sy.el b/12-cal-sy.el
index 93a798c..fdfaa81 100644
--- a/12-cal-sy.el
+++ b/12-cal-sy.el
@@ -5,7 +5,7 @@
 ;;     Author: Steve Youngs <steve@sxemacs.org>
 ;; Maintainer: Steve Youngs <steve@sxemacs.org>
 ;;    Created: <2007-12-02>
-;; Time-stamp: <Friday Jun 29, 2012 16:25:18 steve>
+;; Time-stamp: <Sunday Jul  1, 2012 00:45:19 steve>
 ;;   Download: <http://bastard.steveyoungs.com/~steve/SXEmacs/inits/>
 ;;   HTMLised: <http://bastard.steveyoungs.com/~steve/SXEmacs/htmlinits/12-cal-sy.html>
 ;;   Git Repo: git clone http://git.sxemacs.org/syinit
@@ -145,15 +145,6 @@ for a fontified Diary buffer."
 
 (defvar fancy-diary-font-lock-keywords (fancy-diary-font-lock-keywords))
 
-(defun sy-update-diary-font-lock-keywords ()
-  (sit-for 1.1)
-  (setq fancy-diary-font-lock-keywords (fancy-diary-font-lock-keywords))
-  ;(with-current-buffer (get-buffer-create fancy-diary-buffer)
-  ;  (font-lock-fontify-buffer))
-  )
-
-(run-at-time "23:59:59" 86400 'sy-update-diary-font-lock-keywords)
-
 ;:*=======================
 ;:* Display ISO week numbers
 ;;
@@ -250,6 +241,11 @@ characters on the line."
 	     (include-other-diary-files)))
 (add-hook 'mark-diary-entries-hook #'mark-included-diary-files)
 (add-hook 'today-visible-calendar-hook #'calendar-mark-today)
+(add-hook 'calendar-move-hook #'(lambda () (diary-view-entries 1)))
+(add-hook 'calendar-mode-hook
+	  #'(lambda ()
+	      (setq fancy-diary-font-lock-keywords
+		    (fancy-diary-font-lock-keywords))))
 
 ;:*=======================
 ;:* Appointments