[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master ab5258b1925: Simplify check for non-empty list
From: |
Andreas Schwab |
Subject: |
master ab5258b1925: Simplify check for non-empty list |
Date: |
Sat, 6 May 2023 16:21:01 -0400 (EDT) |
branch: master
commit ab5258b19255ebff04df01d6f55888f43c42dcb9
Author: Andreas Schwab <schwab@linux-m68k.org>
Commit: Andreas Schwab <schwab@linux-m68k.org>
Simplify check for non-empty list
* lisp/gnus/nntp.el (nntp-with-open-group): Simplify check for
non-empty list.
---
lisp/gnus/nntp.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el
index 20c176f2269..a57fd200599 100644
--- 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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master ab5258b1925: Simplify check for non-empty list,
Andreas Schwab <=