From a04d5ebea5e1d9b24e3898ae6e8aacbfeda3d9d9 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Thu, 17 Jan 2002 07:38:25 +0000 Subject: [PATCH] (gnus-agent-batch): Bind gnus-agent-confirmation-function. --- lisp/ChangeLog | 1 + lisp/gnus-agent.el | 5 +++-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 795893c55..a221bad8d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -3,6 +3,7 @@ * gnus-agent.el (gnus-agent-retrieve-headers): Use correct buffer. (gnus-agent-braid-nov): Switch back to nntp-server-buffer. Remove duplications. + (gnus-agent-batch): Bind gnus-agent-confirmation-function. 2002-01-16 Lars Magne Ingebrigtsen diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el index 6c32ed6a8..e9ae80438 100644 --- a/lisp/gnus-agent.el +++ b/lisp/gnus-agent.el @@ -1795,8 +1795,9 @@ The following commands are available: (let ((init-file-user "") (gnus-always-read-dribble-file t)) (gnus)) - (gnus-group-send-queue) - (gnus-agent-fetch-session)) + (let ((gnus-agent-confirmation-function 'gnus-agent-batch-confirmation)) + (gnus-group-send-queue) + (gnus-agent-fetch-session))) (defun gnus-agent-retrieve-headers (articles group &optional fetch-old) (save-excursion -- 2.25.1