Synch to No Gnus 200402102258.

[elisp/gnus.git-] / lisp / nnrss.el

diff --git a/lisp/nnrss.el b/lisp/nnrss.el
index 3368bb1..6735eda 100644 (file)
--- a/lisp/nnrss.el
+++ b/lisp/nnrss.el
@@ -320,7 +320,9 @@ ARTICLE is the article number of the current headline.")
 
 (defun nnrss-read-group-data (group server)
   (setq nnrss-group-data nil)
-  (clrhash nnrss-group-hashtb)
+  (if (hash-table-p nnrss-group-hashtb)
+      (clrhash nnrss-group-hashtb)
+    (setq nnrss-group-hashtb (make-hash-table :test 'equal)))
   (let ((pair (assoc group nnrss-server-data)))
     (setq nnrss-group-max (or (cadr pair) 0))
     (setq nnrss-group-min (+ nnrss-group-max 1)))