From: Romain Francoise <romain@orebokech.com>
Date: Mon, 19 Sep 2005 16:03:51 +0000 (+0000)
Subject: (mark-diary-entries): Revert last change.
X-Git-Tag: emacs-pretest-22.0.90~7012
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=12b8cf536a0507150a4824fe619631d60322cdce;p=emacs.git

(mark-diary-entries): Revert last change.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e2ef572c6c2..7e98ed9b2f7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-09-19  Romain Francoise  <romain@orebokech.com>
+
+	* calendar/diary-lib.el (mark-diary-entries): Revert last change.
+
 2005-09-19  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* font-lock.el (font-lock-default-fontify-region):
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index b748d15e41c..3b634caaa9c 100644
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -864,8 +864,8 @@ diary entries."
     (redraw-calendar))
   (let ((marking-diary-entries t)
         file-glob-attrs marks)
-    (save-excursion
-      (with-current-buffer (find-file-noselect (diary-check-diary-file) t)
+    (with-current-buffer (find-file-noselect (diary-check-diary-file) t)
+      (save-excursion
         (setq mark-diary-entries-in-calendar t)
         (message "Marking diary entries...")
         (setq file-glob-attrs (nth 1 (diary-pull-attrs nil '())))