summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2005-05-29 08:36:26 +0000
committerRichard M. Stallman <rms@gnu.org>2005-05-29 08:36:26 +0000
commitcfde584f6d25db8c0ba229ebb85fba60e99eb1af (patch)
treec9c01c9d0147ac4ab9d75404c2472d9ddb554954 /lisp
parent46065dd4a54fa1a056ab4c86f754d0f99aa9be4e (diff)
downloademacs-cfde584f6d25db8c0ba229ebb85fba60e99eb1af.tar.gz
(save-place-alist-to-file): Write the file using write-region.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/saveplace.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/saveplace.el b/lisp/saveplace.el
index 9dc7b858e37..34c88a89948 100644
--- a/lisp/saveplace.el
+++ b/lisp/saveplace.el
@@ -222,7 +222,8 @@ may have changed\) back to `save-place-alist'."
(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)))))