From a475c60a47211a873cbcb45314c23fbedfe6eb73 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Sat, 12 Jan 2002 16:21:08 +0000 Subject: [PATCH] * gnus-agent.el (gnus-agent-go-online): Fix doc. --- lisp/ChangeLog | 4 ++++ lisp/gnus-agent.el | 5 +++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d1c3abb92..50ecdd49c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2002-01-12 ShengHuo ZHU + + * gnus-agent.el (gnus-agent-go-online): Fix doc. + 2002-01-12 Simon Josefsson * nnimap.el (nnimap-need-unselect-to-notice-new-mail) diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el index 105a616a8..1b476b61c 100644 --- a/lisp/gnus-agent.el +++ b/lisp/gnus-agent.el @@ -2062,13 +2062,14 @@ If CLEAN, don't read existing active and agentview files." (message "Regenerating Gnus agent files...done")) (defun gnus-agent-go-online (&optional force) - "Bring servers online." + "Switch servers into online status." (interactive (list t)) (dolist (server gnus-opened-servers) (when (eq (nth 1 server) 'offline) (if (if (eq force 'ask) (gnus-y-or-n-p - (format "Bring %s:%s online? " (caar server) (cadar server))) + (format "Switch %s:%s into online status? " + (caar server) (cadar server))) force) (setcar (nthcdr 1 server) 'close))))) -- 2.34.1