X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fspam-stat.el;h=b56d0c416efa456000666cae50ac02731f589473;hb=5d8afc874441acee6946b8d1e5534648c6b29cab;hp=daff2dc9567e9fd95e97cc73f056334bf781628f;hpb=4c891e03f2843bd0beda10e4240c9e298c443d3f;p=gnus diff --git a/lisp/spam-stat.el b/lisp/spam-stat.el index daff2dc95..b56d0c416 100644 --- a/lisp/spam-stat.el +++ b/lisp/spam-stat.el @@ -1,6 +1,6 @@ ;;; spam-stat.el --- detecting spam based on statistics -;; Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 2002-2011 Free Software Foundation, Inc. ;; Author: Alex Schroeder ;; Keywords: network @@ -557,6 +557,8 @@ check the variable `spam-stat-score-data'." (when (re-search-forward "^Xref:.*\n" nil t) (delete-region (match-beginning 0) (match-end 0))))) +(autoload 'time-to-number-of-days "time-date") + (defun spam-stat-process-directory (dir func) "Process all the regular files in directory DIR using function FUNC." (let* ((files (directory-files dir t "^[^.]")) @@ -671,5 +673,4 @@ COUNT defaults to 5" (provide 'spam-stat) -;; arch-tag: ff1d2200-8ddb-42fb-bb7b-1b5e20448554 ;;; spam-stat.el ends here