Re: Drafts and autosave

[Colin Rafferty <colin@xemacs.org>]

Jan Vroonhof writes:
> Colin Rafferty <colin@xemacs.org> writes:

>> I think that this is a great idea.  Unfortunately, I can't find the
>> code that sets up the message buffer to be associated with a file.

> (defun message-set-auto-save-file-name ()
>   "Associate the message buffer with a file in the drafts directory."

> which uses

> nndraft-request-associate-buffer 

> However this does an explicit
>       (setq buffer-auto-save-file-name (make-auto-save-file-name)))

Isn't this a beta list?  Can't we suggest patches ourselves?

The only defect is that after a do-auto-save, the buffer is still
shown as modified (although it's really gone into the correct place).

Here is the patch.

1998-10-30  Jan Vroonhof  <vroonhof@math.ethz.ch>

	* nndraft.el (nndraft-request-associate-buffer): Set the autosave
	file name to be the actual file name.

--- lisp/nndraft.el~	Sat Oct 10 20:32:06 1998
+++ lisp/nndraft.el	Fri Oct 30 10:48:25 1998
@@ -156,7 +156,7 @@
 		     group (nnoo-current-server 'nndraft) t 'noinsert))
       (setq file (nndraft-article-filename article)))
     (setq buffer-file-name (expand-file-name file))
-    (setq buffer-auto-save-file-name (make-auto-save-file-name))
+    (setq buffer-auto-save-file-name buffer-file-name)
     (clear-visited-file-modtime)
     article))
 

;; Colin