how to retry denied server?

how to retry denied server?

[Sam Steingold]

If a connection to a server fails at some point (i.e., it is marked as
"denied" in `gnus-opened-servers' and *Server* buffer), there appears
to be no way to tell Gnus to try connecting again except for
hand-editing the value of `gnus-opened-servers':
(setf (second
       (assoc (gnus-server-to-method "...")
              gnus-opened-servers))
      'ok)
what is the right way to handle this?
(patch appended)
-- 
Sam Steingold (http://www.podval.org/~sds) running w2k
<http://www.camera.org> <http://www.iris.org.il> <http://www.memri.org/>
<http://www.mideasttruth.com/> <http://www.honestreporting.com>
My inferiority complex is not as good as yours.


--- gnus-int.el.~6.34.~	2003-07-09 12:00:07.000000000 -0400
+++ gnus-int.el	2003-11-18 09:47:29.083001900 -0500
@@ -195,10 +195,8 @@
     (setq gnus-command-method (gnus-server-to-method gnus-command-method)))
   (let ((elem (assoc gnus-command-method gnus-opened-servers)))
     ;; If this method was previously denied, we just return nil.
-    (if (eq (nth 1 elem) 'denied)
-	(progn
-	  (gnus-message 1 "Denied server")
-	  nil)
+    (when (eq (nth 1 elem) 'denied)
+      (gnus-message 1 "server was denied, retrying!"))
       ;; Open the server.
       (let ((result
 	     (condition-case err
@@ -245,7 +243,7 @@
                    (gnus-open-server gnus-command-method)))
                t)
               (t
-               result))))))
+             result)))))
 
 (defun gnus-close-server (gnus-command-method)
   "Close the connection to GNUS-COMMAND-METHOD."

Re: how to retry denied server?

[Harry Putnam]

Sam Steingold <sds@gnu.org> writes:

> If a connection to a server fails at some point (i.e., it is marked as
> "denied" in `gnus-opened-servers' and *Server* buffer), there appears
> to be no way to tell Gnus to try connecting again except for
> hand-editing the value of `gnus-opened-servers':
> (setf (second
>        (assoc (gnus-server-to-method "...")
>               gnus-opened-servers))
>       'ok)
> what is the right way to handle this?
> (patch appended)

In server buffer press "C" (note uppercase) to close it then "O"
(uppercase)  to try to reopen it.