spam.el: if should be unless

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3700aab..eba7f92 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,14 +2,14 @@
 
        * nnrss.el (nnrss-group-alist): Add and clear up.
 
-2003-01-07  Teodor Zlatanov  <tzz@beld.net>
+2003-01-07  Teodor Zlatanov  <tzz@lifelogs.com>
 
        * spam.el: removed unnecessary condition-case for loading bbdb-com.el
 
        * lpath.el (bbdb-search): added BBDB functions for a better way to
        fix missing functions
 
-2003-01-07  Teodor Zlatanov  <tzz@lifelogs.com>
+       * spam.el (spam-check-ifile): if should be an unless
 
        * spam.el: define 'ignore alias for spam-BBDB-register-routine,
        spam-enter-ham-BBDB, and bbdb-create-internal initially to hush up warnings

diff --git a/lisp/spam.el b/lisp/spam.el
index 8993f08..475f579 100644 (file)
--- a/lisp/spam.el
+++ b/lisp/spam.el
@@ -522,9 +522,9 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details."
        (if (not (eobp))
            (setq category (buffer-substring (point) (spam-point-at-eol))))
        (when (not (zerop (length category))) ; we need a category here
-         (if spam-ifile-all-categories
-             (when (string-equal spam-ifile-spam-category category)
-               (setq return spam-split-group))
+         (unless spam-ifile-all-categories
+           (when (string-equal spam-ifile-spam-category category)
+             (setq return spam-split-group))
            (setq return category)))))  ; always accept the ifile category
     return))