diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-07-01 20:33:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-07-01 20:33:56 +0000 |
| commit | e6f0e76cd0c3c148f9e68868e844c5281883c8b2 (patch) | |
| tree | 4ac6f77d0adc5ecfcdb6c7098468d559faa6e455 /lisp/files.el | |
| parent | 94142e7881f7d0bbd20468eb280c747791688ccb (diff) | |
| download | emacs-e6f0e76cd0c3c148f9e68868e844c5281883c8b2.tar.gz | |
(set-visited-file-name): Rename auto-save file only if it exists.
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/files.el b/lisp/files.el index 66adbba5f20..e9a8f9ba28a 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1107,6 +1107,7 @@ if you wish to pass an empty string as the argument." (make-auto-save-file-name))) ;; Rename the old auto save file if any. (and oauto buffer-auto-save-file-name + (file-exists-p oauto) (rename-file oauto buffer-auto-save-file-name t))) (if buffer-file-name (set-buffer-modified-p t))) |