diff --git a/lisp/gnus/spam.el b/lisp/gnus/spam.el
index c9030f11ee3..bacad983c78 100644
--- a/lisp/gnus/spam.el
+++ b/lisp/gnus/spam.el
@@ -2108,7 +2108,7 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details."
      (defalias 'bbdb-gethash 'ignore)
      nil)))
 
-(eval-when-compile
+(eval-and-compile
   (when (featurep 'bbdb-com)
     ;; when the BBDB changes, we want to clear out our cache
     (defun spam-clear-cache-BBDB (&rest immaterial)