# HG changeset patch # User Katsumi Yamaoka # Date 1275951642 0 # Node ID 68c7ddc1af1631c9fdcca2910839497cf7b8f027 # Parent 2bc8bdaafa9a7097c913069bd7a48346f7026085 Synch with Gnus trunk. 2010-06-07 Teodor Zlatanov * gnus.texi (Interactive): Explain effect of gnus-expert-user better. 2010-06-07 Teemu Likonen (tiny change) * gnus-agent.el (gnus-agent-expire-unagentized-dirs): Don't ask about deleting unused directories when gnus-expert-user is t. diff -r 2bc8bdaafa9a -r 68c7ddc1af16 doc/misc/ChangeLog --- a/doc/misc/ChangeLog Mon Jun 07 22:49:32 2010 +0000 +++ b/doc/misc/ChangeLog Mon Jun 07 23:00:42 2010 +0000 @@ -1,3 +1,7 @@ +2010-06-07 Teodor Zlatanov + + * gnus.texi (Interactive): Explain effect of gnus-expert-user better. + 2010-05-26 Michael Albinus * eshell.texi (Built-ins): Describe, how to disable a built-in command diff -r 2bc8bdaafa9a -r 68c7ddc1af16 doc/misc/gnus.texi --- a/doc/misc/gnus.texi Mon Jun 07 22:49:32 2010 +0000 +++ b/doc/misc/gnus.texi Mon Jun 07 23:00:42 2010 +0000 @@ -22906,8 +22906,11 @@ @item gnus-expert-user @vindex gnus-expert-user If this variable is non-@code{nil}, you will seldom be asked any -questions by Gnus. It will simply assume you know what you're doing, no -matter how strange. +questions by Gnus. It will simply assume you know what you're doing, +no matter how strange. For example, quitting Gnus, exiting a group +without an update, catching up with a group, deleting expired +articles, and replying by mail to a news message will not require +confirmation. @item gnus-interactive-catchup @vindex gnus-interactive-catchup diff -r 2bc8bdaafa9a -r 68c7ddc1af16 lisp/gnus/ChangeLog --- a/lisp/gnus/ChangeLog Mon Jun 07 22:49:32 2010 +0000 +++ b/lisp/gnus/ChangeLog Mon Jun 07 23:00:42 2010 +0000 @@ -1,3 +1,8 @@ +2010-06-07 Teemu Likonen (tiny change) + + * gnus-agent.el (gnus-agent-expire-unagentized-dirs): Don't ask about + deleting unused directories when gnus-expert-user is t. + 2010-06-02 Katsumi Yamaoka * gnus-art.el (gnus-article-browse-delete-temp-files): Don't make query diff -r 2bc8bdaafa9a -r 68c7ddc1af16 lisp/gnus/gnus-agent.el --- a/lisp/gnus/gnus-agent.el Mon Jun 07 22:49:32 2010 +0000 +++ b/lisp/gnus/gnus-agent.el Mon Jun 07 23:00:42 2010 +0000 @@ -3634,7 +3634,8 @@ deleting them?"))) (while to-remove (let ((dir (pop to-remove))) - (if (gnus-y-or-n-p (format "Delete %s? " dir)) + (if (or gnus-expert-user + (gnus-y-or-n-p (format "Delete %s? " dir))) (let* (delete-recursive files f (delete-recursive