]> git.eshelyaron.com Git - emacs.git/commitdiff
(rmail-insert-inbox-text): If inbox is not in the
authorRichard M. Stallman <rms@gnu.org>
Tue, 13 Jul 1993 05:52:32 +0000 (05:52 +0000)
committerRichard M. Stallman <rms@gnu.org>
Tue, 13 Jul 1993 05:52:32 +0000 (05:52 +0000)
spool dir, try copying before renaming.

lisp/mail/rmail.el

index ad99396a45cded5e6e43879056fa898c735ed405..a4ee62c3ad67e02ecb9a8c92c80801117caef284 100644 (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.