Mercurial > emacs
changeset 61451:25fbe49d4631
(save-place-alist-to-file): Catch errors writing file.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 10 Apr 2005 23:32:00 +0000 |
| parents | 4ccc4c9adf16 |
| children | b9d559315c0a |
| files | lisp/saveplace.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/saveplace.el Sun Apr 10 23:31:17 2005 +0000 +++ b/lisp/saveplace.el Sun Apr 10 23:32:00 2005 +0000 @@ -220,7 +220,9 @@ ((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)))))