Commit cfde584f authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(save-place-alist-to-file): Write the file using write-region.

parent 46065dd4
......@@ -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)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment