diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/gnus/gnus-dup.el | 4 |
2 files changed, 5 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index e3e141124c4..4911f243343 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,8 @@ 2011-09-11 Lars Magne Ingebrigtsen <larsi@gnus.org> + * gnus-dup.el (gnus-dup-suppress-articles): Move "Suppressing + duplicates" to a higher level. + * gnus-util.el (gnus-verbose): Lower default to 6 to get rid of the most egregious messages. diff --git a/lisp/gnus/gnus-dup.el b/lisp/gnus/gnus-dup.el index eaecc07d767..8db1905ef8b 100644 --- a/lisp/gnus/gnus-dup.el +++ b/lisp/gnus/gnus-dup.el @@ -131,7 +131,7 @@ seen in the same session." "Mark duplicate articles as read." (unless gnus-dup-list (gnus-dup-open)) - (gnus-message 6 "Suppressing duplicates...") + (gnus-message 8 "Suppressing duplicates...") (let ((auto (and gnus-newsgroup-auto-expire (memq gnus-duplicate-mark gnus-auto-expirable-marks))) number) @@ -145,7 +145,7 @@ seen in the same session." (push (cons number gnus-duplicate-mark) gnus-newsgroup-reads) (push number gnus-newsgroup-expirable) (push (cons number gnus-expirable-mark) gnus-newsgroup-reads))))) - (gnus-message 6 "Suppressing duplicates...done")) + (gnus-message 8 "Suppressing duplicates...done")) (defun gnus-dup-unsuppress-article (article) "Stop suppression of ARTICLE." |