Mercurial > emacs
diff lisp/gnus/message.el @ 98344:7fa3e064d230
Merge from gnus--devo--0
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1429
author | Miles Bader <miles@gnu.org> |
---|---|
date | Thu, 25 Sep 2008 15:38:29 +0000 |
parents | 0f2f9b7e7d8e |
children | 952d664ebd93 |
line wrap: on
line diff
--- a/lisp/gnus/message.el Thu Sep 25 10:45:20 2008 +0000 +++ b/lisp/gnus/message.el Thu Sep 25 15:38:29 2008 +0000 @@ -445,6 +445,7 @@ "Non-nil means when sending a message ask for y/n confirmation." :group 'message-sending :group 'message-mail + :version "22.3" ;; No Gnus :link '(custom-manual "(message)Sending Variables") :type 'boolean) @@ -6296,13 +6297,22 @@ (if (gnus-alive-p) (setq message-draft-article (nndraft-request-associate-buffer "drafts")) + + ;; If Gnus were alive, draft messages would be saved in the drafts folder. + ;; But Gnus is not alive, so arrange to save the draft message in a + ;; regular file in message-auto-save-directory. Append a unique + ;; time-based suffix to the filename to allow multiple drafts to be saved + ;; simultaneously without overwriting each other (which mimics the + ;; functionality of the Gnus drafts folder). (setq buffer-file-name (expand-file-name + (concat (if (memq system-type '(ms-dos ms-windows windows-nt cygwin cygwin32 win32 w32 mswindows)) "message" "*message*") + (format-time-string "-%Y%m%d-%H%M%S")) message-auto-save-directory)) (setq buffer-auto-save-file-name (make-auto-save-file-name))) (clear-visited-file-modtime)