Graceful Gnus exit on Emacs exit

Graceful Gnus exit on Emacs exit

[Sergey Organov]

Hello,

Gnus v5.31 doesn't seem to install any hooks at Emacs exit that is unfortunate.

After some digging I came up with the following code in my .gnus.el to
gracefully exit Gnus on Emacs exit:

(defun gnus-exit ()
  "Exit gnus without confirmation and return 't"
  (let ((noninteractive 't)
        (gnus-expert-user 't)
        (gnus-interactive-exit 'quiet))
    (gnus-group-exit) 't))

(add-hook 'kill-emacs-hook 'gnus-exit)

I worry why it ended up being that complex? Is there better way?

Thanks,
-- Sergey

Re: Graceful Gnus exit on Emacs exit

[Eric Abrahamsen]

Sergey Organov <sorganov@gmail.com> writes:

> Hello,
>
> Gnus v5.31 doesn't seem to install any hooks at Emacs exit that is unfortunate.
>
> After some digging I came up with the following code in my .gnus.el to
> gracefully exit Gnus on Emacs exit:
>
> (defun gnus-exit ()
>   "Exit gnus without confirmation and return 't"
>   (let ((noninteractive 't)
>         (gnus-expert-user 't)
>         (gnus-interactive-exit 'quiet))
>     (gnus-group-exit) 't))
>
> (add-hook 'kill-emacs-hook 'gnus-exit)
>
> I worry why it ended up being that complex? Is there better way?

I wouldn't actually consider that to be very complex! At least not
compared to the elisp customizations I end up writing :)

The non-complex version would be:

(add-hook 'hill-emacs-hook #'gnus-group-exit)

Though you'd have to deal with the prompts.

No, I don't think there's a better way.

Re: Graceful Gnus exit on Emacs exit

[Sergey Organov]

Eric Abrahamsen <eric@ericabrahamsen.net> writes:

> Sergey Organov <sorganov@gmail.com> writes:
>
>> Hello,
>>
>> Gnus v5.31 doesn't seem to install any hooks at Emacs exit that is unfortunate.
>>
>> After some digging I came up with the following code in my .gnus.el to
>> gracefully exit Gnus on Emacs exit:
>>
>> (defun gnus-exit ()
>>   "Exit gnus without confirmation and return 't"
>>   (let ((noninteractive 't)
>>         (gnus-expert-user 't)
>>         (gnus-interactive-exit 'quiet))
>>     (gnus-group-exit) 't))
>>
>> (add-hook 'kill-emacs-hook 'gnus-exit)
>>
>> I worry why it ended up being that complex? Is there better way?
>
> I wouldn't actually consider that to be very complex! At least not
> compared to the elisp customizations I end up writing :)

I just hoped for a "Graceful shutdown on Emacs exit" somewhere
among million Gnus knobs.

>
> The non-complex version would be:
>
> (add-hook 'hill-emacs-hook #'gnus-group-exit)

Yeah, that's what I thought as well.

>
> Though you'd have to deal with the prompts.

... and that's where the actual journey started!

>
> No, I don't think there's a better way.

Sigh... Thanks!

-- Sergey

Re: Graceful Gnus exit on Emacs exit

[Colin Baxter]

>>>>> Sergey Organov <sorganov@gmail.com> writes:

    > Hello, Gnus v5.31 doesn't seem to install any hooks at Emacs exit
    > that is unfortunate.

version 5.13 surely, or have I been asleep?



-- 
Colin Baxter
URL: http://www.Colin-Baxter.com
---------------------------------------------------------------------
GnuPG fingerprint: 68A8 799C 0230 16E7 BF68  2A27 BBFA 2492 91F5 41C8
---------------------------------------------------------------------

Re: Graceful Gnus exit on Emacs exit

[Sergey Organov]

Colin Baxter <m43cap@yandex.com> writes:

>>>>>> Sergey Organov <sorganov@gmail.com> writes:
>
>     > Hello, Gnus v5.31 doesn't seem to install any hooks at Emacs exit
>     > that is unfortunate.
>
> version 5.13 surely, or have I been asleep?

Yeah, sure, it rather was me who was mistyping, sorry!

-- Sergey

Re: Graceful Gnus exit on Emacs exit

[Colin Baxter]

Dear Sergey

You had me worried for a moment!
>>>>> Sergey Organov <sorganov@gmail.com> writes:

    > Colin Baxter <m43cap@yandex.com> writes:
    >>>>>>> Sergey Organov <sorganov@gmail.com> writes:
    >> 
    >> > Hello, Gnus v5.31 doesn't seem to install any hooks at Emacs
    >> exit > that is unfortunate.
    >> 
    >> version 5.13 surely, or have I been asleep?

    > Yeah, sure, it rather was me who was mistyping, sorry!

    > -- Sergey

Best wishes,

-- 
Colin Baxter
URL: http://www.Colin-Baxter.com
---------------------------------------------------------------------
GnuPG fingerprint: 68A8 799C 0230 16E7 BF68  2A27 BBFA 2492 91F5 41C8
---------------------------------------------------------------------
The sole cause of all human misery is the inability of people to sit
quietly in their rooms.  Blaise Pascal, 1670
---------------------------------------------------------------------

Re: Graceful Gnus exit on Emacs exit

[Bob Newell]

> (defun gnus-exit ()
>   "Exit gnus without confirmation and return 't"
>   (let ((noninteractive 't)
>         (gnus-expert-user 't)
>         (gnus-interactive-exit 'quiet))
>     (gnus-group-exit) 't))
>
> (add-hook 'kill-emacs-hook 'gnus-exit)

If it's any consolation, I do what amounts to the exact same thing,
including avoiding the prompts. I've noticed one undesirable side
effect (and very likely it's just the rest of my setup causing it) ...
if I should happen to exit Gnus during my Emacs session, when I
terminate Emacs, Gnus starts up again just so it can shut down !

-- 
Bob Newell
Honolulu, Hawai`i

- Via GNU/Linux/Emacs/Gnus/BBDB.

Re: Graceful Gnus exit on Emacs exit

[Eric Abrahamsen]

Bob Newell <bobnewell@bobnewell.net> writes:

>> (defun gnus-exit ()
>>   "Exit gnus without confirmation and return 't"
>>   (let ((noninteractive 't)
>>         (gnus-expert-user 't)
>>         (gnus-interactive-exit 'quiet))
>>     (gnus-group-exit) 't))
>>
>> (add-hook 'kill-emacs-hook 'gnus-exit)
>
> If it's any consolation, I do what amounts to the exact same thing,
> including avoiding the prompts. I've noticed one undesirable side
> effect (and very likely it's just the rest of my setup causing it) ...
> if I should happen to exit Gnus during my Emacs session, when I
> terminate Emacs, Gnus starts up again just so it can shut down !

Ha! You could wrap it in a check to `gnus-alive-p' to avoid that...

Re: Graceful Gnus exit on Emacs exit

[Sergey Organov]

Bob Newell <bobnewell@bobnewell.net> writes:

>> (defun gnus-exit ()
>>   "Exit gnus without confirmation and return 't"
>>   (let ((noninteractive 't)
>>         (gnus-expert-user 't)
>>         (gnus-interactive-exit 'quiet))
>>     (gnus-group-exit) 't))
>>
>> (add-hook 'kill-emacs-hook 'gnus-exit)
>
> If it's any consolation, I do what amounts to the exact same thing,
> including avoiding the prompts.

It sure is, thanks for sharing!

> I've noticed one undesirable side effect (and very likely it's just
> the rest of my setup causing it) ... if I should happen to exit Gnus
> during my Emacs session, when I terminate Emacs, Gnus starts up again
> just so it can shut down !

Tried it here, but didn't notice Gnus start, so it's likely something in
your setup indeed, as I do need to wait a little when Gnus actually
starts.

-- Sergey