Mercurial > emacs
diff lisp/mail/rmail.el @ 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 | 89b71a85be3e |
children | bd122ee8c338 |
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.