diff lisp/calendar/icalendar.el @ 107638:772da445ced7

Merge from mainline.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 06 Mar 2010 05:16:27 -0500
parents 2da9673fc448
children 111f90199914 376148b31b5e
line wrap: on
line diff
--- a/lisp/calendar/icalendar.el	Sat Feb 27 07:43:30 2010 -0500
+++ b/lisp/calendar/icalendar.el	Sat Mar 06 05:16:27 2010 -0500
@@ -2246,8 +2246,7 @@
                  'make-diary-entry)
                string non-marking diary-file)))
   ;; Würgaround to remove the trailing blank char
-  (save-excursion
-    (set-buffer (find-file diary-file))
+  (with-current-buffer (find-file diary-file)
     (goto-char (point-max))
     (if (= (char-before) ? )
         (delete-char -1)))