* lisp/gnus/nnselect.el (nnselect-server-opened): Just return t.

diff --git a/lisp/gnus/nnselect.el b/lisp/gnus/nnselect.el
index 5bb59bf540cea88440dcd9ad56882adc09afecc8..d21c5edee157532b3c522f67944717c3b0eb578f 100644 (file)
--- a/lisp/gnus/nnselect.el
+++ b/lisp/gnus/nnselect.el
@@ -185,6 +185,17 @@ If this variable is nil, or if the provided function returns nil,
   (let ((backend (or (car (gnus-server-to-method server)) 'nnselect)))
     (nnoo-change-server backend server definitions)))
 
+;; (deffoo nnselect-server-opened (&optional server)
+;;   "Is SERVER the current virtual server?"
+;;   (if (string-empty-p server)
+;;       t
+;;     (let ((backend (car (gnus-server-to-method server))))
+;;     (nnoo-current-server-p (or backend 'nnselect) server))))
+
+(deffoo nnselect-server-opened (&optional _server)
+  t)
+
+
 (deffoo nnselect-request-group (group &optional server dont-check info)
   (let ((group (nnselect-possibly-change-group group server))
        length)
@@ -627,14 +638,6 @@ If this variable is nil, or if the provided function returns nil,
     group))
 
 
-;; (defun nnselect-server-opened (&optional server)
-;;   "Open SERVER if not yet opened."
-;;   (let ((backend (car (gnus-server-to-method server))))
-;;     (nnoo-current-server-p (or backend 'nnselect) server)))
-
-(deffoo nnselect-server-opened (&optional _server)
-  t)
-
 (defun nnselect-search-thread (header)
   "Make an nnselect group containing the thread with article HEADER.
 The current server will be searched.  If the registry is