mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Richard M. Stallman 2005-05-29 08:36:26 +00:00
parent 46065dd4a5
commit cfde584f6d
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/saveplace.el
View File

@ -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)))))