From: Teodor Zlatanov Date: Tue, 7 Jan 2003 19:54:42 +0000 (+0000) Subject: spam.el: if should be unless X-Git-Url: https://cgit.sxemacs.org/?a=commitdiff_plain;h=2fd86681292506bc684c97aac502343224a46907;p=gnus spam.el: if should be unless --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3700aab11..eba7f92b1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,14 +2,14 @@ * nnrss.el (nnrss-group-alist): Add and clear up. -2003-01-07 Teodor Zlatanov +2003-01-07 Teodor Zlatanov * 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 + * 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 8993f08b6..475f5792f 100644 --- 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))