Synch to No Gnus 200405180015.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9c557bf..dce3bf9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-05-18  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus-start.el (gnus-get-unread-articles-in-group): Don't do
+       stuff for non-living group.s
+
 2004-05-18  Jesper Harder  <harder@ifa.au.dk>
 
        * gnus-art.el (gnus-article-followup-with-original)

diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el
index 6ffb8a1..f2a065f 100644 (file)
--- a/lisp/gnus-start.el
+++ b/lisp/gnus-start.el
@@ -1546,7 +1546,7 @@ newsgroup."
             active)))))
 
 (defun gnus-get-unread-articles-in-group (info active &optional update)
-  (when active
+  (when (and info active)
     ;; Allow the backend to update the info in the group.
     (when (and update
               (gnus-request-update-info

diff --git a/lisp/nnrss.el b/lisp/nnrss.el
index fc2662a..55dd460 100644 (file)
--- a/lisp/nnrss.el
+++ b/lisp/nnrss.el
@@ -254,7 +254,7 @@ ARTICLE is the article number of the current headline.")
   "Fetch URL and put it in a the expected Lisp structure."
   (with-temp-buffer
     ;;some CVS versions of url.el need this to close the connection quickly
-    (let* (xmlform htmlform)
+    (let (xmlform htmlform)
       ;; bit o' work necessary for w3 pre-cvs and post-cvs
       (if local
          (let ((coding-system-for-read 'binary))