From bc7dc792dfe514fc66f8e330a4a95ece66560fa4 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Mon, 1 Aug 2022 21:22:57 +0200 Subject: [PATCH] Fix compilation warning in spam.el * lisp/gnus/spam.el (spam-check-blackholes): Adjust now that query-dig is obsolete. --- lisp/gnus/spam.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lisp/gnus/spam.el b/lisp/gnus/spam.el index 5af29c0a246..2883a6186bd 100644 --- a/lisp/gnus/spam.el +++ b/lisp/gnus/spam.el @@ -43,14 +43,12 @@ (require 'gnus-uu) ; because of key prefix issues ;;; for the definitions of group content classification and spam processors (require 'gnus) +(require 'dig) (eval-when-compile (require 'cl-lib) (require 'hashcash)) -;; autoload query-dig -(autoload 'query-dig "dig") - ;; autoload spam-report (autoload 'spam-report-gmane "spam-report") (autoload 'spam-report-gmane-spam "spam-report") @@ -2008,7 +2006,7 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details." (unless matches (let ((query-string (concat ip "." server))) (if spam-use-dig - (let ((query-result (query-dig query-string))) + (let ((query-result (dig-query query-string))) (when query-result (gnus-message 6 "(DIG): positive blackhole check `%s'" query-result) -- 2.39.5