There's something strange afoot in nnrss

There's something strange afoot in nnrss

[Bill Wohler]

This morning, I ran M-x nnrss-generate-download-script to update my RSS
download script. It died because there wasn't an entry in
nnrss-group-alist for an element in nnrss-server-data. I've attached a
patch that will generate a hiccup rather than death (and found that
actually two items had gone missing).

I do not know how the items in nnrss-group-alist might have gone
missing.

The second thing that is strange is that nnrss-server-data doesn't list
all of the RSS feeds that I am subscribed to and that are listed in the
*Group* buffer. Is this normal?

  (length nnrss-group-alist): 16
  (length nnrss-server-data): 10
  subscribed nnrss groups in *Group* (read, unread): 15
  unsubscribed nnrss groups in *Group*: 3

As a result, nnrss-generate-download-script misses 5 groups that I am
subscribed to.

I thought that `g' in the server buffer might fix things up, but that's
not supported by the nnrss backend. RET didn't seem to change things
either.

So, I manually fixed up nnrss-group-alist using data from my previous
invocation of nnrss-generate-download-script and added entries in
nnrss-server-data so that the list matched my subscriptions.

I'm using CVS Emacs that's a week or two old and have nnrss-use-local
set to t (as you may have guessed).

--- nnrss.el.orig	2006-06-13 09:53:39.000000000 -0700
+++ nnrss.el	2006-06-13 09:59:51.000000000 -0700
@@ -816,9 +816,11 @@
   (dolist (elem nnrss-server-data)
     (let ((url (or (nth 2 elem)
 		   (second (assoc (car elem) nnrss-group-alist)))))
-      (insert "$WGET -q -O \"$RSSDIR\"/'"
-	      (nnrss-translate-file-chars (concat (car elem) ".xml"))
-	      "' '" url "'\n"))))
+      (if url
+          (insert "$WGET -q -O \"$RSSDIR\"/'"
+                  (nnrss-translate-file-chars (concat (car elem) ".xml"))
+                  "' '" url "'\n")
+        (warn "%s disappeared from nnrss-group-alist" (car elem))))))
 
 (defun nnrss-translate-file-chars (name)
   (let ((nnheader-file-name-translation-alist

-- 
Bill Wohler <wohler@newt.com>  http://www.newt.com/wohler/  GnuPG ID:610BD9AD
Maintainer of comp.mail.mh FAQ and MH-E.
If you're passed on the right, you're in the wrong lane.