From 6fd388c6e585180281a4507796c5f919677ce626 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 21 Feb 2005 23:28:00 +0000 Subject: [PATCH] Synch to No Gnus 200502211551. --- lisp/ChangeLog | 5 +++++ lisp/nnrss.el | 9 ++------- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1a87387..ffe4bfb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-02-21 Arne J,Ax(Brgensen + + * nnrss.el (nnrss-verbose): Removed. + (nnrss-request-group): Use `nnheader-message' instead. + 2005-02-19 Mark Plaksin (tiny change) * nnrss.el (nnrss-verbose): New variable. diff --git a/lisp/nnrss.el b/lisp/nnrss.el index 7c87c2b..832b9b5 100644 --- 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) -- 1.7.10.4