From: Jeremy Harris Date: Fri, 21 Nov 2014 15:12:17 +0000 (+0000) Subject: Testsuite: case 0601 logging ordering X-Git-Tag: exim-4_85_RC2~17 X-Git-Url: https://vcs.fsf.org/?a=commitdiff_plain;h=1d96994879ba6a7993fc6a9c04e3cc059d45d79f;p=exim.git Testsuite: case 0601 logging ordering --- 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"; }