diff --git a/lisp/gnus/spam.el b/lisp/gnus/spam.el index 96a7da2313..8634fa680d 100644 --- a/lisp/gnus/spam.el +++ b/lisp/gnus/spam.el @@ -44,12 +44,9 @@ ;;; for the definitions of group content classification and spam processors (require 'gnus) -(eval-when-compile (require 'hashcash)) - -;; for nnimap-split-download-body-default -(eval-when-compile (require 'nnimap)) - -(eval-when-compile (require 'cl-lib)) +(eval-when-compile + (require 'cl-lib) + (require 'hashcash)) ;; autoload query-dig (autoload 'query-dig "dig") @@ -1230,8 +1227,9 @@ spam-generic-score ;;; set up IMAP widening if it's necessary (defun spam-setup-widening () + (defvar nnimap-split-download-body) (when (spam-widening-needed-p) - (setq nnimap-split-download-body-default t))) + (setq nnimap-split-download-body t))) (defun spam-widening-needed-p (&optional force-symbols) (let (found)