From: yamaoka <yamaoka>
Date: Fri, 19 Nov 2004 00:52:49 +0000 (+0000)
Subject: Synch to No Gnus 200411190050.
X-Git-Tag: t-gnus-6_17_4-quimby-~671
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2fa36976672a352414b3a06da287d7e55ffa7cf2;p=elisp%2Fgnus.git-

Synch to No Gnus 200411190050.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cb8c1d2..53867eb 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2004-11-19  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+	* dns.el (query-dns): Use sit-for to time instead of
+	accept-process-output, since that doesn't seem to work on udp
+	sockets. 
+
 2004-11-17  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 	* rfc2047.el (rfc2047-encode-region): Encode bogus delimiters.
diff --git a/lisp/dns.el b/lisp/dns.el
index 7add5dc..2d704fe 100644
--- a/lisp/dns.el
+++ b/lisp/dns.el
@@ -388,6 +388,7 @@ If REVERSEP, look up an IP address."
 		      tcp-p))
 	  (while (and (zerop (buffer-size))
 		      (> times 0))
+	    (sit-for (/ step 1000.0))
 	    (accept-process-output process 0 step)
 	    (decf times step))
 	  (ignore-errors