From: yamaoka <yamaoka>
Date: Tue, 28 Feb 2006 00:46:55 +0000 (+0000)
Subject: Synch to No Gnus 200602280040.
X-Git-Tag: t-gnus-6_17_4-quimby-~70
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8e69651bdc55d5b40bae7a6dcf53b77d426095cb;p=elisp%2Fgnus.git-

Synch to No Gnus 200602280040.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dba993f..fa2728a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-02-27  Reiner Steib  <Reiner.Steib@gmx.de>
+
+	* gnus-sum.el (gnus-sequence-of-unread-articles): Return nil if
+	first or last are nil.
+
 2006-02-24  Andreas Seltenreich  <uwi7@rz.uni-karlsruhe.de>
 
 	* nnweb.el (nnweb-gmane-create-mapping): Don't choke on ^M.
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 7638136..eb7c940 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -6648,10 +6648,12 @@ displayed, no centering will be performed."
 	  (setq nlast (if (atom (cadr read)) (cadr read) (caadr read)))
 	  (setq read (cdr read)))))
     ;; And add the last unread articles.
-    (cond ((< first last)
-           (push (cons first last) unread))
-          ((= first last)
-           (push first unread)))
+    (cond ((not (and first last))
+	   nil)
+	  ((< first last)
+	   (push (cons first last) unread))
+	  ((= first last)
+	   (push first unread)))
     ;; Return the sequence of unread articles.
     (delq 0 (nreverse unread))))