2004-01-06 Steve Youngs <sryoungs@bigpond.net.au>

[gnus] / lisp / dns.el

diff --git a/lisp/dns.el b/lisp/dns.el
index e24245a..e5acf4e 100644 (file)
--- a/lisp/dns.el
+++ b/lisp/dns.el
@@ -309,8 +309,8 @@ If TCP-P, the first two bytes of the package with be the length field."
   (if (featurep 'xemacs)
       `(let ((coding-system-for-read 'binary)
             (coding-system-for-write 'binary))
-        (gnus-xmas-open-network-stream "dns" (current-buffer)
-                                       ,server "domain" 'udp))
+        (open-network-stream "dns" (current-buffer)
+                             ,server "domain" 'udp))
     `(let ((server ,server)
           (coding-system-for-read 'binary)
           (coding-system-for-write 'binary))