/[emacs]/emacs/lisp/calendar/diary-lib.el
ViewVC logotype

Diff of /emacs/lisp/calendar/diary-lib.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.105 by rfrancoise, Sun Sep 18 13:26:53 2005 UTC revision 1.106 by rfrancoise, Mon Sep 19 16:03:51 2005 UTC
# Line 864  diary entries." Line 864  diary entries."
864      (redraw-calendar))      (redraw-calendar))
865    (let ((marking-diary-entries t)    (let ((marking-diary-entries t)
866          file-glob-attrs marks)          file-glob-attrs marks)
867      (save-excursion      (with-current-buffer (find-file-noselect (diary-check-diary-file) t)
868        (with-current-buffer (find-file-noselect (diary-check-diary-file) t)        (save-excursion
869          (setq mark-diary-entries-in-calendar t)          (setq mark-diary-entries-in-calendar t)
870          (message "Marking diary entries...")          (message "Marking diary entries...")
871          (setq file-glob-attrs (nth 1 (diary-pull-attrs nil '())))          (setq file-glob-attrs (nth 1 (diary-pull-attrs nil '())))

Legend:
Removed from v.1.105  
changed lines
  Added in v.1.106

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26