summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-agent.el
diff options
context:
space:
mode:
authorRomain Francoise <romain@orebokech.com>2005-09-24 23:24:38 +0000
committerRomain Francoise <romain@orebokech.com>2005-09-24 23:24:38 +0000
commit668414769aa92a7350bacab3c98507c3c1189e5c (patch)
tree4c37cf46ace725269e2d7557b1e168979c638972 /lisp/gnus/gnus-agent.el
parent08c583dbd17a8cf8db889402a57f4aef8803ff17 (diff)
downloademacs-668414769aa92a7350bacab3c98507c3c1189e5c.tar.gz
2005-09-25 Romain Francoise <romain@orebokech.com>
* gnus-agent.el (gnus-agent-expire-group, gnus-agent-expire): * gnus-start.el (gnus-subscribe-interactively): * gnus-uu.el (gnus-uu-grab-articles): End `yes-or-no-p' and `y-or-n-p' prompts with question mark and space.
Diffstat (limited to 'lisp/gnus/gnus-agent.el')
-rw-r--r--lisp/gnus/gnus-agent.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-agent.el b/lisp/gnus/gnus-agent.el
index 47d1dfd7364..0d024d06e11 100644
--- a/lisp/gnus/gnus-agent.el
+++ b/lisp/gnus/gnus-agent.el
@@ -2934,7 +2934,7 @@ FORCE is equivalent to setting the expiration predicates to true."
(if (or (not (eq articles t))
(yes-or-no-p
(concat "Are you sure that you want to "
- "expire all articles in " group ".")))
+ "expire all articles in " group "? ")))
(let ((gnus-command-method (gnus-find-method-for-group group))
(overview (gnus-get-buffer-create " *expire overview*"))
orig)
@@ -3308,7 +3308,7 @@ FORCE is equivalent to setting the expiration predicates to true."
(gnus-agent-expire-group group articles force)
(if (or (not (eq articles t))
(yes-or-no-p "Are you sure that you want to expire all \
-articles in every agentized group."))
+articles in every agentized group? "))
(let ((methods (gnus-agent-covered-methods))
;; Bind gnus-agent-expire-current-dirs to enable tracking
;; of agent directories.