Synch to No Gnus 200502211551.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1a87387..ffe4bfb 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-02-21  Arne J\e,Ax\e(Brgensen <arne@arnested.dk>
+
+       * nnrss.el (nnrss-verbose): Removed.
+       (nnrss-request-group): Use `nnheader-message' instead.
+
 2005-02-19  Mark Plaksin  <happy@usg.edu>  (tiny change)
 
        * nnrss.el (nnrss-verbose): New variable.

diff --git a/lisp/nnrss.el b/lisp/nnrss.el
index 7c87c2b..832b9b5 100644 (file)
--- a/lisp/nnrss.el
+++ b/lisp/nnrss.el
@@ -72,9 +72,6 @@
 
 (defvar nnrss-use-local nil)
 
-(defvar nnrss-verbose t
-  "Write messages when requesting group.")
-
 (defvar nnrss-description-field 'X-Gnus-Description
   "Field name used for DESCRIPTION.
 To use the description in headers, put this name into `nnmail-extra-headers'.")
@@ -154,8 +151,7 @@ ARTICLE is the article number of the current headline.")
   'nov)
 
 (deffoo nnrss-request-group (group &optional server dont-check)
-  (if nnrss-verbose
-      (message (concat "nnrss requesting " group "...")))
+  (nnheader-message 6 (concat "nnrss: Requesting " group "..."))
   (setq group (nnrss-decode-group-name group))
   (nnrss-possibly-change-group group server)
   (prog1
@@ -167,8 +163,7 @@ ARTICLE is the article number of the current headline.")
         "211 %d %d %d %s\n" nnrss-group-max nnrss-group-min nnrss-group-max
         (prin1-to-string group)
         t))
-    (when nnrss-verbose
-      (message (concat "nnrss done with " group ".")))))
+    (nnheader-message 6 (concat "nnrss: Requesting " group "...done"))))
 
 (deffoo nnrss-close-group (group &optional server)
   t)