From: yamaoka Date: Tue, 12 Jun 2001 02:41:06 +0000 (+0000) Subject: * nnshimbun.el (nnshimbun-retrieve-headers-with-nov): Remove a redundant check X-Git-Tag: t-gnus-6_15_4-02-quimby~10 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a29207ac97d53c5a26249b0a84fb0b2e969e8808;p=elisp%2Fgnus.git- * nnshimbun.el (nnshimbun-retrieve-headers-with-nov): Remove a redundant check that I made. --- diff --git a/ChangeLog b/ChangeLog index 15aacf4..3f468a7 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2001-06-12 Katsumi Yamaoka + + * lisp/nnshimbun.el (nnshimbun-retrieve-headers-with-nov): Remove + a redundant check that I made. + 2001-06-11 Katsumi Yamaoka * lisp/lpath.el: Don't Fbind `xml-node-children'. diff --git a/lisp/nnshimbun.el b/lisp/nnshimbun.el index 12f0fae..3d5ecb9 100644 --- a/lisp/nnshimbun.el +++ b/lisp/nnshimbun.el @@ -335,7 +335,7 @@ (nnheader-nov-delete-outside-range (if fetch-old (max 1 (- (car articles) fetch-old)) (car articles)) - (and articles (nth (1- (length articles)) articles))) + (nth (1- (length articles)) articles)) t))))))