Re: auto open servers?

[Eric Abrahamsen <eric@ericabrahamsen.net>]

hput <hputn3@zohomail.com> writes:

> Emanuel Berg <moasenwood@zoho.eu> writes:
>
>> Now it looks like this:
>>
>> (defun gnus-open-servers ()
>>   (interactive)
>>   (unless (get-buffer gnus-server-buffer)
>>     (gnus-group-enter-server-mode) )
>>   (with-current-buffer gnus-server-buffer
>>     (gnus-server-open-all-servers)
>>     (bury-buffer) )
>>   (message "done") )
>>
>
> [...]
>
> Is that working for you?  I see no improvement running M-x
>
> gnus-open-servers <RET>
>
> Still get the busy sign for ages or maybe forever.
>
> Maybe I misunderstand this thread but I often see in server mode that
> server shows open but I get no action trying to send post or get new
> news, until I close server and then reopen.
>
> I can load a snippet of code posted here a while back by Eric A:
>   Message-ID: <87wo0a5407.fsf@ericabrahamsen.net>
>
> (dolist (elem gnus-opened-servers)
>   (gnus-close-server (car elem)))
>
> I load it in what is no doubt about the most primitive possible way by
> M-x load-file  and loading a file containing erics above code.
>
> That does get some action... but even that, lately has been taking a while
> to goad news.gmane.io into action
>
> Is it possible you can post something that combines both code snippets?

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.