diff lisp/calendar/icalendar.el @ 107252:2da9673fc448

Fix more save-excursion warnings. * textmodes/reftex-toc.el (reftex-toc-promote-prepare): * emacs-lisp/elint.el (elint-add-required-env): * cedet/semantic/db-find.el (semanticdb-find-translate-path-brutish-default): * cedet/ede/make.el (ede-make-check-version): * calendar/icalendar.el (icalendar--add-diary-entry): * calc/calcalg2.el (math-tracing-integral): Use with-current-buffer instead of save-excursion.

--- a/lisp/calendar/icalendar.el	Sat Feb 27 20:11:15 2010 -0500
+++ b/lisp/calendar/icalendar.el	Sat Feb 27 20:22:44 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)))