Gnus development mailing list
 help / color / mirror / Atom feed
From: Jan Vroonhof <vroonhof@math.ethz.ch>
Subject: Re: Drafts and autosave
Date: 31 Oct 1998 17:01:29 +0100	[thread overview]
Message-ID: <byyapwu3dy.fsf@bolzano.math.ethz.ch> (raw)
In-Reply-To: Lars Magne Ingebrigtsen's message of "Sat, 31 Oct 1998 14:26:37 GMT"

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:
> 
> > I think the main complaint people have about the current behaviour
> > is that unwanted autosaves can stick around, e.g. when one does
> > `C-c C-k'.

No that is not the Main complaint. The main problem is that there is
no initial file in the nndraft group. I.e. if you are editng a new
mail and Emacs crashes/you exit X/you hang up then ONLY the autosave
file exists not the normal file. Therefore it does not show up in the
nndraft group.

What I would like is that when starting to edit the empty message is
saved to the nndraft group so it exits. When you visit it the
normal Emacs mechanisms will inform you there is an autosave file and
suggest to M-x recover-file. 

Jan

diff -u /u/users/vroonhof/scratch/xemacs/orig/pgnus-0.40/lisp/nndraft.el /u/users/vroonhof/.xemacs/lisp/gnus/nndraft.el
--- /u/users/vroonhof/scratch/xemacs/orig/pgnus-0.40/lisp/nndraft.el	Sat Oct 31 16:58:18 1998
+++ /u/users/vroonhof/.xemacs/lisp/gnus/nndraft.el	Sat Oct 31 16:58:18 1998
@@ -157,7 +157,8 @@
       (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))
-    (clear-visited-file-modtime)
+    (set-buffer-modified-p t)
+    (save-buffer)
     article))
 
 (deffoo nndraft-request-expire-articles (articles group &optional server force)




  reply	other threads:[~1998-10-31 16:01 UTC|newest]

Thread overview: 21+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1998-10-30 10:37 Jan Vroonhof
1998-10-30 14:33 ` Colin Rafferty
1998-10-30 15:35   ` Jan Vroonhof
1998-10-30 15:55     ` Jan Vroonhof
1998-10-30 16:00     ` Colin Rafferty
1998-10-30 16:14       ` Dan Christensen
1998-10-31 14:20         ` Lars Magne Ingebrigtsen
1998-10-31 16:01           ` Jan Vroonhof [this message]
1998-10-31 16:24             ` Dan Christensen
1998-11-07 13:40             ` Lars Magne Ingebrigtsen
1998-11-07 16:59               ` Nelson Jose dos Santos Ferreira
1998-11-07 23:36                 ` Lars Magne Ingebrigtsen
1998-11-08  0:33                   ` Joev Dubach
1998-11-10  4:33                     ` Lars Magne Ingebrigtsen
1998-11-09 10:32                   ` Robert Bihlmeyer
1998-11-09 14:10               ` Jan Vroonhof
1998-11-10  4:35                 ` Lars Magne Ingebrigtsen
1998-11-10  8:59                   ` Nelson Jose dos Santos Ferreira
1998-11-13 17:52                     ` Lars Magne Ingebrigtsen
1998-11-16 12:13                       ` Jan Vroonhof
1998-10-31 15:47       ` Jan Vroonhof

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=byyapwu3dy.fsf@bolzano.math.ethz.ch \
    --to=vroonhof@math.ethz.ch \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).