Simplify check for non-empty list

* lisp/gnus/nntp.el (nntp-with-open-group): Simplify check for
non-empty list.

diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el
index 20c176f2269ed2e90b859c0c5cfad4443fddec02..a57fd200599ae6225499eecb97b13a4fff9cd814 100644 (file)
--- a/lisp/gnus/nntp.el
+++ b/lisp/gnus/nntp.el
@@ -643,8 +643,7 @@ connection timeouts (which may be several minutes) or
 `nntp-with-open-group', opens a new connection then re-issues the NNTP
 command whose response triggered the error."
   (declare (indent 2) (debug (form form [&optional symbolp] def-body)))
-  (when (and (listp connectionless)
-            (not (eq connectionless nil)))
+  (when (consp connectionless))
     (setq forms (cons connectionless forms)
          connectionless nil))
   `(nntp-with-open-group-function ,group ,server ,connectionless