diff options
| author | Chong Yidong <[email protected]> | 2010-02-27 20:22:44 -0500 |
|---|---|---|
| committer | Chong Yidong <[email protected]> | 2010-02-27 20:22:44 -0500 |
| commit | de3a1fe9358d3d833a15dc4fb559b902cdc1168b (patch) | |
| tree | 2c9238dc843da462a720a64df7a75f5e053d9d42 /lisp/calendar | |
| parent | 8c3e96d2f0e4fee24498567c5840eb8d03d26720 (diff) | |
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.
Diffstat (limited to 'lisp/calendar')
| -rw-r--r-- | lisp/calendar/icalendar.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/calendar/icalendar.el b/lisp/calendar/icalendar.el index 535956be14..a07402aa03 100644 --- a/lisp/calendar/icalendar.el +++ b/lisp/calendar/icalendar.el @@ -2246,8 +2246,7 @@ the entry." '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))) |