Mercurial > emacs
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)))