Fix bug: news server can return #(0 0 0) as server-info for a news

group, indicating that there are no articles on the server.  News
reader was expecting the last two numbers to be article numbers, but
zero is not a valid article number.

diff --git a/v7/src/edwin/snr.scm b/v7/src/edwin/snr.scm
index 1c6bceb40a1b3a60f5da7356a46fba09d1f36306..dbfa5bd3a4ff12b742ad2855d2a9ba162a246598 100644 (file)
--- a/v7/src/edwin/snr.scm
+++ b/v7/src/edwin/snr.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Id: snr.scm,v 1.33 1997/05/27 07:30:31 cph Exp $
+;;;    $Id: snr.scm,v 1.34 1997/05/27 19:35:17 cph Exp $
 ;;;
 ;;;    Copyright (c) 1995-97 Massachusetts Institute of Technology
 ;;;
@@ -4082,7 +4082,8 @@ With prefix arg, replaces the file with the list information."
 (define (news-group:number-of-articles group)
   (let ((estimate (news-group:estimated-n-articles group)))
     (and estimate
-        (if (news-group:reader-hook group)
+        (if (and (news-group:reader-hook group)
+                 (news-group:server-has-articles? group))
             (let ((n-seen
                    (count-ranges
                     (news-group:guarantee-ranges-deleted group))))