X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-dup.el;h=20fb24fd176fec56040c816fd3c6a544eec0a613;hb=8381633c0d11c104699e2c5c0ec6cd370c11c2c7;hp=71f6a39d7d19f22a2cc7d99b299367666c47f74f;hpb=9a8731d6dea8021a10dec1b42f382609336a9aa9;p=gnus diff --git a/lisp/gnus-dup.el b/lisp/gnus-dup.el index 71f6a39d7..20fb24fd1 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-2014 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." @@ -159,5 +158,4 @@ seen in the same session." (provide 'gnus-dup) -;; arch-tag: 903e94db-7b00-4d19-83ee-cf34a81fa5fb ;;; gnus-dup.el ends here