*** empty log message ***

* empty log message *
2581ab99 · Jim Blandy · 6251ee24 · 2581ab99
Commit 2581ab99 authored Jul 17, 1992 by Jim Blandy
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 1 deletion

lisp/mail/rmail.el lisp/mail/rmail.el +4 -1

No files found.
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -515,7 +515,10 @@ argument causes us to read a file name and use that file as the inbox."
    (while files
      (setq file (expand-file-name (substitute-in-file-name (car files)))
 	    ;;>> un*x specific <<
-	    tofile (concat file "~"))
+	    ;; The "+" used to be "~", which is an extremely poor choice;
+	    ;; it might accidentally be deleted when space is low
+	    ;; (as happened to me!).
+	    tofile (concat file "+"))
      ;; If getting from mail spool directory,
      ;; use movemail to move rather than just renaming,
      ;; so as to interlock with the mailer.