Mercurial > emacs
changeset 5325:2c747b081be1
(rmail-insert-inbox-text): If copy-file fails,
call rename-file with t as third arg.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 24 Dec 1993 02:49:41 +0000 |
| parents | f091cdec77e2 |
| children | 65b2fa217aa0 |
| files | lisp/mail/rmail.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/rmail.el Fri Dec 24 02:44:13 1993 +0000 +++ b/lisp/mail/rmail.el Fri Dec 24 02:49:41 1993 +0000 @@ -778,7 +778,8 @@ (condition-case nil (copy-file file tofile nil) (error - (rename-file file tofile nil))) + ;; Third arg is t so we can replace existing file TOFILE. + (rename-file file tofile t))) ;; Make the real inbox file empty. ;; Leaving it deleted could cause lossage ;; because mailers often won't create the file.