[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-sum.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-sum.el |
Date: |
Tue, 28 Feb 2006 00:38:35 +0000 |
Index: emacs/lisp/gnus/gnus-sum.el
diff -u emacs/lisp/gnus/gnus-sum.el:1.76 emacs/lisp/gnus/gnus-sum.el:1.77
--- emacs/lisp/gnus/gnus-sum.el:1.76 Tue Jan 17 02:39:38 2006
+++ emacs/lisp/gnus/gnus-sum.el Tue Feb 28 00:38:34 2006
@@ -6452,10 +6452,12 @@
(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))))