X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=test%2Faux-fixed%2F0601.udpserver;h=2638ef55f6c1287d2249430c9fe80b9676d4a1a8;hb=456d70ec89d9ba122871f1f035bb308f4771016f;hp=5513402b06101721cee964118e2c91b5fc1574c9;hpb=f77cff22db0bbb4d71a16becb5512e19d86ed63a;p=user%2Fhenk%2Fcode%2Fexim.git

diff --git a/test/aux-fixed/0601.udpserver b/test/aux-fixed/0601.udpserver
index 5513402b0..2638ef55f 100644
--- a/test/aux-fixed/0601.udpserver
+++ b/test/aux-fixed/0601.udpserver
@@ -18,5 +18,6 @@ $select = IO::Select->new($socket) or die "IO::Select $!";
 
 if (scalar ($select->can_read(5)) == 1) {
 	$socket->recv($recieved_data,1024);
+	select(undef, undef, undef, 0.5);
 	print "received: $recieved_data\n";
 }