From d0897fa5354a5b582277d1011d9617bb7a00964b Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 21 Dec 2004 15:03:31 +0000 Subject: [PATCH] From Markus Rost : (mark-diary-entries): Set mark-diary-entries-in-calendar only after checking for diary-file. --- lisp/calendar/diary-lib.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el index fdade091ab2..511f82f8f2f 100644 --- a/lisp/calendar/diary-lib.el +++ b/lisp/calendar/diary-lib.el @@ -841,11 +841,11 @@ Each entry in the diary file visible in the calendar window is marked. After the entries are marked, the hooks `nongregorian-diary-marking-hook' and `mark-diary-entries-hook' are run." (interactive) - (setq mark-diary-entries-in-calendar t) (let ((marking-diary-entries t) file-glob-attrs marks) (save-excursion (set-buffer (find-file-noselect (diary-check-diary-file) t)) + (setq mark-diary-entries-in-calendar t) (message "Marking diary entries...") (setq file-glob-attrs (nth 1 (diary-pull-attrs nil '()))) (let ((d diary-date-forms) -- 2.39.5