changeset 7705:b10cc49f6c37

(gnus-summary-catchup): Check gnus-interactive-catchup. (gnus-summary-catchup-and-exit): Likewise.
author Richard M. Stallman <rms@gnu.org>
date Fri, 27 May 1994 09:11:50 +0000
parents 022727dbe5f3
children 44ff7a0a70b6
files lisp/=gnus.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/=gnus.el	Fri May 27 08:17:46 1994 +0000
+++ b/lisp/=gnus.el	Fri May 27 09:11:50 1994 +0000
@@ -3940,6 +3940,7 @@
 If prefix argument ALL is non-nil, all articles are marked as read."
   (interactive "P")
   (if (or quietly
+	  (not gnus-interactive-catchup) ;Without confirmation?
 	  (y-or-n-p
 	   (if all
 	       "Do you really want to mark everything as read? "
@@ -3966,6 +3967,7 @@
 If prefix argument ALL is non-nil, all articles are marked as read."
   (interactive "P")
   (if (or quietly
+	  (not gnus-interactive-catchup) ;Without confirmation?
 	  (y-or-n-p
 	   (if all
 	       "Do you really want to mark everything as read? "