diff options
| author | Richard M. Stallman <rms@gnu.org> | 2005-04-10 23:32:00 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2005-04-10 23:32:00 +0000 |
| commit | 6b98170fcf2e7ecf5c3541118628e62b83013653 (patch) | |
| tree | 6d1b210c4cc277223c6c5c73cefdbc2c40856cde /lisp/saveplace.el | |
| parent | 1ecc5922df5ede77b13a23d1189c6d7e477a608a (diff) | |
| download | emacs-6b98170fcf2e7ecf5c3541118628e62b83013653.tar.gz | |
(save-place-alist-to-file): Catch errors writing file.
Diffstat (limited to 'lisp/saveplace.el')
| -rw-r--r-- | lisp/saveplace.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/saveplace.el b/lisp/saveplace.el index e536e3c3237..cb61c8383b5 100644 --- a/lisp/saveplace.el +++ b/lisp/saveplace.el @@ -220,7 +220,9 @@ may have changed\) back to `save-place-alist'." ((eq 'nospecial save-place-version-control) version-control) (t t)))) - (write-file file) + (condition-case nil + (write-file file) + (file-error (message "Can't write %s" file))) (kill-buffer (current-buffer)) (message "Saving places to %s...done" file))))) |