(gnus-open-server): Try to open unagentized servers
authorKai Grossjohann <kgrossjo@eu.uu.net>
Wed, 30 Apr 2003 21:51:49 +0000 (21:51 +0000)
committerKai Grossjohann <kgrossjo@eu.uu.net>
Wed, 30 Apr 2003 21:51:49 +0000 (21:51 +0000)
even when unplugged.

lisp/ChangeLog
lisp/gnus-int.el

index 60dd520..b2a0753 100644 (file)
@@ -1,3 +1,8 @@
+2003-04-30  Kai Gro\e,A_\e(Bjohann  <kai.grossjohann@gmx.net>
+
+       * gnus-int.el (gnus-open-server): Try to open unagentized servers
+       even when unplugged.
+
 2003-04-30  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * gnus-art.el (gnus-button-prefer-mid-or-mail): Fixed typo in
index 2a3837d..9d4ed31 100644 (file)
@@ -207,16 +207,18 @@ If it is down, start it up (again)."
           ((eq (nth 1 state) 'offline)
            ;; If this method was previously opened offline, we just return t.
            t)
-          ((not gnus-plugged)
+          ((and (not gnus-plugged)
+               (member gnus-command-method
+                       gnus-agent-covered-methods))
            ;; I'm opening servers while unplugged.  Set the status to
            ;; either 'offline or 'denied without asking (I'm assuming
            ;; that the user wants to go 'offline on every agentized
            ;; server when opening while unplugged.)
            (setcar (cdr state) (if (and gnus-agent
-                                       (gnus-agent-method-p gnus-command-method))
-                                  (or gnus-server-unopen-status
-                                      'offline)
-                                'denied))
+                                       (gnus-agent-method-p gnus-command-method))
+                                  (or gnus-server-unopen-status
+                                      'offline)
+                                'denied))
            
            (if (eq (nth 1 state) 'offline)
                ;; Invoke the agent's backend to open the offline server.