diff options
| author | Reiner Steib <Reiner.Steib@gmx.de> | 2009-04-28 16:57:53 +0000 |
|---|---|---|
| committer | Reiner Steib <Reiner.Steib@gmx.de> | 2009-04-28 16:57:53 +0000 |
| commit | 9cc20f6c21f03cbd4e58785648f119f1bb370588 (patch) | |
| tree | 7dd4a20f1eccf8035365240e709e6c67303909a6 | |
| parent | 4dc5a19d8b363379bf92a342023ed59877396cc5 (diff) | |
| download | emacs-9cc20f6c21f03cbd4e58785648f119f1bb370588.tar.gz | |
Use dns-query instead of query-dns. Was renamed on 2008-12-25 in dns.el.
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/spam.el | 10 |
2 files changed, 10 insertions, 5 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 82cd077d0db..de21ccf716c 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2009-04-28 Reiner Steib <Reiner.Steib@gmx.de> + + * spam.el: Use dns-query instead of query-dns. Was renamed on + 2008-12-25 in dns.el. + 2009-04-20 Stefan Monnier <monnier@iro.umontreal.ca> * rfc2047.el (rfc2047-decode-region): Don't skip past `start', which diff --git a/lisp/gnus/spam.el b/lisp/gnus/spam.el index b7d1a13b697..c315f2f0347 100644 --- a/lisp/gnus/spam.el +++ b/lisp/gnus/spam.el @@ -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 @@ The regular expression is matched against the address." :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 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details." (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))) |