(deffoo nnrss-close-group (group &optional server)
t)
-(eval-when-compile
- (defvar mm-text-html-renderer)
- (defvar mm-text-html-washer-alist))
+(defvar mm-text-html-renderer)
+(defvar mm-text-html-washer-alist)
(deffoo nnrss-request-article (article &optional group server buffer)
(setq group (nnrss-decode-group-name group))
;;; Snarf functions
(defun nnrss-make-hash-index (item)
- (setq item (remove-if
+ (setq item (gnus-remove-if
(lambda (field)
(when (listp field)
(memq (car field) nnrss-ignore-article-fields)))