diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-08-28 20:13:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-08-28 20:13:56 +0000 |
| commit | aaf175012237d1bbde53bb49b553739887295351 (patch) | |
| tree | c216ed24973aa95f6ddbf2cfedcca35381339403 /lisp | |
| parent | 1cc852cc966516ba2daae60c69a17e099d70d7c3 (diff) | |
| download | emacs-aaf175012237d1bbde53bb49b553739887295351.tar.gz | |
(recover-session-finish): Catch erorr in recover-file.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/files.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 64f33c58e2f..73b9085ddf9 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2178,7 +2178,11 @@ This command is used in the special Dired buffer created by ;; or is empty if the buffer was not visiting a file. ;; The second line is the auto-save file name. (map-y-or-n-p "Recover %s? " - (lambda (file) (save-excursion (recover-file file))) + (lambda (file) + (condition-case nil + (save-excursion (recover-file file)) + (error + "Failed to recover `%s'" file))) (lambda () (if (eobp) nil |