X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fgnus-dup.el;h=7e6679a0c05961eb0f5fa92152f1aa41ca3fdf54;hp=be909ccd798301c87636c86e28b9fffc9212a30e;hb=9ff43b22e07294fa5393fdea5c1e90a86edbe717;hpb=c9a393eeb329a99695566342a9f03b8a30000898 diff --git a/lisp/gnus-dup.el b/lisp/gnus-dup.el index be909ccd7..7e6679a0c 100644 --- a/lisp/gnus-dup.el +++ b/lisp/gnus-dup.el @@ -1,7 +1,6 @@ ;;; gnus-dup.el --- suppression of duplicate articles in Gnus -;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. +;; Copyright (C) 1996-2013 Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen ;; Keywords: news @@ -132,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) @@ -146,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."