From: Jeremy Harris <jgh146exb@wizmail.org>
Date: Fri, 21 Nov 2014 15:12:17 +0000 (+0000)
Subject: Testsuite: cat 0601 logging ordering
X-Git-Tag: exim-4_91_RC1~148^2~42^2~78
X-Git-Url: https://vcs.fsf.org/?p=exim.git;a=commitdiff_plain;h=cdcb9659adffb89d14648bf528fdbf8d54708582

Testsuite: cat 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";
 }