X-Git-Url: https://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fdns.el;h=e5acf4e880c51ed54e57b7c15690a9b02bca4b9a;hp=e24245aca5ef95f59510cfc348b1993efe03bd49;hb=eec20aecfb21c26e60d9a7f23267d15c1b40d7a1;hpb=cbd2e552244ecc7f69d458fefde3ce9b91b6714b

diff --git a/lisp/dns.el b/lisp/dns.el
index e24245aca..e5acf4e88 100644
--- 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))