Changes committed gnus/lisp (ChangeLog spam.el)

Modified: ChangeLog spam.el

Use dns-query instead of query-dns.  Was renamed on 2008-12-25 in dns.el.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.1992 gnus/lisp/ChangeLog:7.1993
--- ChangeLog:7.1992	Tue Mar  3 04:01:23 2009
+++ ChangeLog	Tue Apr 28 19:02:36 2009
@@ -1,3 +1,8 @@
+2009-04-28  Reiner Steib  <[email protected]>
+
+	* spam.el: Use dns-query instead of query-dns.  Was renamed on
+	2008-12-25 in dns.el.
+
 2009-03-03  Brian Sniffen  <[email protected]>  (tiny change)
 
 	* gnus-draft.el (gnus-draft-send): Bind gnus-message-setup-hook to nil
Index: spam.el
diff -u gnus/lisp/spam.el:7.102 gnus/lisp/spam.el:7.103
--- spam.el:7.102	Thu Jan 22 08:02:16 2009
+++ spam.el	Tue Apr 28 19:02:36 2009
@@ -73,8 +73,8 @@
 (autoload 'gnus-registry-store-extra-entry "gnus-registry")
 (autoload 'gnus-registry-fetch-extra "gnus-registry")
 
-;; autoload query-dns
-(autoload 'query-dns "dns")
+;; autoload dns-query
+(autoload 'dns-query "dns")
 
 ;;}}}
 
@@ -173,7 +173,7 @@
   :group 'spam)
 
 (defcustom spam-use-dig t
-  "Whether `query-dig' should be used instead of `query-dns'."
+  "Whether `query-dig' should be used instead of `dns-query'."
   :type 'boolean
   :group 'spam)
 
@@ -2038,9 +2038,9 @@
 			(push (list ip server query-result)
 			      matches)))
 		  ;; else, if not using dig.el
-		  (when (query-dns query-string)
+		  (when (dns-query query-string)
 		    (gnus-message 6 "positive blackhole check")
-		    (push (list ip server (query-dns query-string 'TXT))
+		    (push (list ip server (dns-query query-string 'TXT))
 			  matches)))))))))
     (when matches
       spam-split-group)))