(spam-stat-test-directory): Compare against zero.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e7be667..da9d6f8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-05-01  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * spam-stat.el (spam-stat-test-directory): Compare against zero. 
+
 2003-05-01  Trey Jackson <tjackson@ichips.intel.com>  (tiny change)
 
        * spam-stat.el (spam-stat-test-directory): Skip 0 length files.

diff --git a/lisp/spam-stat.el b/lisp/spam-stat.el
index 66d4ff3..96df016 100644 (file)
--- a/lisp/spam-stat.el
+++ b/lisp/spam-stat.el
@@ -542,7 +542,7 @@ You can use this to determine error rates."
       (dolist (f files)
        (when (and (file-readable-p f)
                   (file-regular-p f)
-                   (> (nth 7 (file-attributes f))))
+                   (> (nth 7 (file-attributes f)) 0))
          (setq count (1+ count))
          (message "Reading %.2f%%, score %.2f%%"
                   (/ count max) (/ score count))