Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-21 20:37:38 +00:00
Code Issues Projects Releases Packages Wiki Activity

(rmail-insert-inbox-text): If inbox is not in the

Browse source 
spool dir, try copying before renaming.
This commit is contained in:
Richard M. Stallman 1993-07-13 05:52:32 +00:00
parent 626f67f354
commit 019bf2a313
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/mail/rmail.el
View file

@ -753,7 +753,12 @@ argument causes us to read a file name and use that file as the inbox."
(not (file-exists-p file))))
nil)
((and (not movemail) (not popmail))
(rename-file file tofile nil)
;; Try copying. If that fails (perhaps no space),
;; rename instead.
(condition-case nil
(copy-file file tofile nil)
(error
(rename-file file tofile nil)))
;; Make the real inbox file empty.
;; Leaving it deleted could cause lossage
;; because mailers often won't create the file.