Mercurial > emacs

changeset 59063:be41382b25ea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
From Markus Rost <rost@ias.edu>: (mark-diary-entries): Set mark-diary-entries-in-calendar only after checking for diary-file.
author Glenn Morris <rgm@gnu.org>
date Tue, 21 Dec 2004 15:03:31 +0000
parents a48a2a91a063
children c674f42f1748
files lisp/calendar/diary-lib.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/diary-lib.el	Tue Dec 21 15:02:36 2004 +0000
+++ b/lisp/calendar/diary-lib.el	Tue Dec 21 15:03:31 2004 +0000
@@ -841,11 +841,11 @@
 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)