[Emacs-diffs] Changes to emacs/lisp/calendar/diary-lib.el

[Glenn Morris]

Index: emacs/lisp/calendar/diary-lib.el
diff -c emacs/lisp/calendar/diary-lib.el:1.85 
emacs/lisp/calendar/diary-lib.el:1.86
*** emacs/lisp/calendar/diary-lib.el:1.85       Mon Dec 20 18:09:22 2004
--- emacs/lisp/calendar/diary-lib.el    Tue Dec 21 15:03:31 2004
***************
*** 841,851 ****
  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))
        (message "Marking diary entries...")
        (setq file-glob-attrs (nth 1 (diary-pull-attrs nil '())))
        (let ((d diary-date-forms)
--- 841,851 ----
  After the entries are marked, the hooks `nongregorian-diary-marking-hook' and
  `mark-diary-entries-hook' are run."
    (interactive)
    (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)