(nntp-open-server): Return whether the open was successful or not.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3691946..6fd81fb 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-09-17  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * nntp.el (nntp-open-server): Return whether the open was successful or
+       not.
+
        * gnus-sum.el (gnus-summary-first-subject): Have `unseen-or-unread'
        select an unread unseen article first.
 

diff --git a/lisp/nntp.el b/lisp/nntp.el
index 3cdd630..59f803d 100644 (file)
--- a/lisp/nntp.el
+++ b/lisp/nntp.el
@@ -1014,7 +1014,8 @@ command whose response triggered the error."
     (unless (assq 'nntp-address defs)
       (setq defs (append defs (list (list 'nntp-address server)))))
     (nnoo-change-server 'nntp server defs)
-    (unless connectionless
+    (if connectionless
+       t
       (or (nntp-find-connection nntp-server-buffer)
          (nntp-open-connection nntp-server-buffer)))))