procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix compilation warning in spam.el

Browse source 
* lisp/gnus/spam.el (spam-check-blackholes): Adjust now that
query-dig is obsolete.
This commit is contained in:
Lars Ingebrigtsen 2022-08-01 21:22:57 +02:00
parent 7320a812e9
commit bc7dc792df
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/gnus/spam.el
View file

@ -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)