Fix save-excursion warning in files.el.

* files.el (recover-session-finish): Use with-current-buffer instead of save-excursion.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1a51b18cbf5fae8b0bf6ebe729f4f242994a7588..27890d66ba6fa4902dd4221dfa7c142a600ed400 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-02-28  Chong Yidong  <cyd@stupidchicken.com>
+
+       * files.el (recover-session-finish): Use with-current-buffer
+       instead of save-excursion.
+
 2010-02-27  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        Fix in-buffer completion when after-change-functions modify the buffer.

diff --git a/lisp/files.el b/lisp/files.el
index d6783f82fbb6bcbaea0eb208b6df35c68c239b6c..f0a8d72d3f0ac92fefc902ad5c2e5b61ee0fe42c 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -5034,9 +5034,8 @@ This command is used in the special Dired buffer created by
     (dired-unmark 1)
     (dired-do-flagged-delete t)
     (unwind-protect
-       (save-excursion
+       (with-current-buffer buffer
          ;; Read in the auto-save-list file.
-         (set-buffer buffer)
          (erase-buffer)
          (insert-file-contents file)
          ;; Loop thru the text of that file