Re: auto open servers?

[hput <hputn3@zohomail.com>]

hput <hputn3@zohomail.com> writes:

> Eric Abrahamsen <eric@ericabrahamsen.net> writes:
>
> hput wrote:
>>> Is it possible you can post something that combines both code snippets?
>
> Eric responded:
>> You can just put my code inside Emanuel's code:
>>
>> (defun gnus-reopen-servers ()
>>   (interactive)
>>   (unless (get-buffer gnus-server-buffer)
>>     (gnus-group-enter-server-mode))
>>   (dolist (elem gnus-opened-servers)
>>     (gnus-close-server (car elem)))
>>   (with-current-buffer gnus-server-buffer
>>     (gnus-server-open-all-servers)))
>>
>> Then you'll want to either attach that to a hook, or put it on a timer,
>> or bind it to a key... or some combination of those.
>
> Is it expected that above code should throw focus into server buffer
> and remain there until manually 'Q'ing out?

Sorry, I see the bit about burying buffer is not encluded there:

this seems to do it without jerking you into the server buffer phsyically.

(defun gnus-reopen-servers ()
  (interactive)
  (unless (get-buffer gnus-server-buffer)
    (gnus-group-enter-server-mode))
  (dolist (elem gnus-opened-servers)
    (gnus-close-server (car elem)))
  (with-current-buffer gnus-server-buffer
    (gnus-server-open-all-servers)
    (bury-buffer) )
  (message "done") )

Tough you probably woud'nt want to run it in the middle of reading a
group.