Commit 321eb232 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(mail): Put the auto-save file in the home dir.

parent b4bcc0c4
......@@ -1020,7 +1020,10 @@ The seventh argument ACTIONS is a list of actions to take
;;; (message "Auto save file for draft message exists; consider M-x mail-recover"))
;;; t))
(pop-to-buffer "*mail*")
(auto-save-mode auto-save-default)
;; Put the auto-save file in the home dir
;; to avoid any danger that it can't be written.
(let ((default-directory "~/"))
(auto-save-mode auto-save-default))
(mail-mode)
;; Disconnect the buffer from its visited file
;; (in case the user has actually visited a file *mail*).
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment