;;; Snarf functions
(defun nnrss-check-group (group server)
- (let (file xml subject url extra changed author date rss-ns rdf-ns content-ns dc-ns)
+ (let (file xml subject url extra changed author
+ date rss-ns rdf-ns content-ns dc-ns)
(if (and nnrss-use-local
(file-exists-p (setq file (expand-file-name
(nnrss-translate-file-chars
(second (assoc group nnrss-group-alist))))
(unless url
(setq url
- (nnrss-discover-feed (read-string (format "URL to search for %s: " group) "http://")))
+ (nnrss-discover-feed
+ (read-string
+ (format "URL to search for %s: " group) "http://")))
(let ((pair (assoc group nnrss-server-data)))
(if pair
(setcdr (cdr pair) (list url))