saving gnus .newsrc.eld

saving gnus .newsrc.eld

[Mark Hovey]

A minor defect of Gnus has been bothering me for a while, so since we
are at the beginning of a new development cycle I thought I would
mention it.  If I run Gnus, then forget about it and kill emacs later
without ever quitting Gnus, then save-buffers-kill-emacs (C-x C-c) asks
me if I want to save .newsrc-dribble.  At this point I have no good
option except to hit C-g, switch to the *Group buffer, and quit Gnus.
If I do not do this and just allow Emacs to save .newsrc-dribble, then
the next time I start Gnus it will ask me if I want to read the autosave
file.  I don't lose any mail this way, but it is still annoying.  

Is there some variable I can set so that Gnus will automatically save
itself when I leave a Gnus-controlled buffer, or something of that
sort?  In general, is there a good solution to this?

My current solution is to redefine save-buffers-kill-emacs in my .gnus
file by adding the lines

  (setq gnus-interactive-exit nil)
  (gnus-group-exit)

right after the interactive statement.  

Anybody have anything better to do?
                   Mark Hovey

Re: saving gnus .newsrc.eld

[Colin Rafferty]

Mark Hovey writes:

> If I run Gnus, then forget about it and kill emacs later
> without ever quitting Gnus, then save-buffers-kill-emacs (C-x C-c) asks
> me if I want to save .newsrc-dribble.  At this point I have no good
> option except to hit C-g, switch to the *Group buffer, and quit Gnus.

> Is there some variable I can set so that Gnus will automatically save
> itself when I leave a Gnus-controlled buffer, or something of that
> sort?  In general, is there a good solution to this?

While it is very difficult to recognize leaving a Gnus buffer, there are 
ways of coming close.

I have the following in my .gnus.el:

    (add-hook 'gnus-summary-exit-hook 'gnus-dribble-save)

You could change it from gnus-dribble-save to gnus-group-save-newsrc,
but I don't think the time spent is worth it.

> My current solution is to redefine save-buffers-kill-emacs in my .gnus
> file by adding the lines

>   (setq gnus-interactive-exit nil)
>   (gnus-group-exit)

> right after the interactive statement.  

> Anybody have anything better to do?

A better choice might be to put something on `kill-emacs-query-functions'.

Untested code follows:

    (add-hook 'kill-emacs-query-functions
              '(lambda ()
                 (let ((gnus-interactive-exit nil))
                   (gnus-group-exit)
                   nil))) ; this nil is important, see doc for k-e-q-f

-- 
export-a-crypto-system, see: http://www.dcs.ex.ac.uk/~aba/rsa/
#!/bin/perl -sp0777i<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<j]dsj
$/=unpack('H*',$_);$_=`echo 16dio\U$k"SK$/SM$n\EsN0p[lN*1
lK[d2%Sa2/d0$^Ixp"|dc`;s/\W//g;$_=pack('H*',/((..)*)$/)