diff lisp/saveplace.el @ 90188:01137c1fdbe9

Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-57 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 324-352) - Merge from gnus--rel--5.10 - Update from CVS - etc/emacs-buffer.gdb: Remove RCS keywords * gnus--rel--5.10 (patch 70-79) - Update from CVS - Merge from emacs--cvs-trunk--0
author Miles Bader <miles@gnu.org>
date Mon, 06 Jun 2005 02:39:45 +0000
parents 08185296b491 8641f46cf18f
children f9a65d7ebd29
line wrap: on
line diff
--- a/lisp/saveplace.el	Sun Jun 05 01:58:02 2005 +0000
+++ b/lisp/saveplace.el	Mon Jun 06 02:39:45 2005 +0000
@@ -222,7 +222,8 @@
               (t
                t))))
 	(condition-case nil
-	    (write-file file)
+	    ;; Don't use write-file; we don't want this buffer to visit it.
+	    (write-region (point-min) (point-max) file)
 	  (file-error (message "Can't write %s" file)))
         (kill-buffer (current-buffer))
         (message "Saving places to %s...done" file)))))