Mercurial > emacs

diff lisp/=gnus.el @ 7705:b10cc49f6c37

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 67b7d1ea7b2e
children 4a683dc76931
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? "