diff options
author | sma <sma@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2006-03-27 11:37:53 +0000 |
---|---|---|
committer | sma <sma@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2006-03-27 11:37:53 +0000 |
commit | 17784bbb9bb80cfbf564f2fb0fba115295d94f12 (patch) | |
tree | 4a9e32fd3eb649d7b387641396d1e349adf38b48 /TAO/tests/RTCORBA/Server_Protocol/run_test.pl | |
parent | 06b0f61affdace5ed61562369f77686c26fbc304 (diff) | |
download | ATCD-17784bbb9bb80cfbf564f2fb0fba115295d94f12.tar.gz |
ChangeLogEntry: Wed Mar 22 16:18:00 UTC 2006 Simon Massey <sma@prismtech.com>
Diffstat (limited to 'TAO/tests/RTCORBA/Server_Protocol/run_test.pl')
-rwxr-xr-x | TAO/tests/RTCORBA/Server_Protocol/run_test.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/TAO/tests/RTCORBA/Server_Protocol/run_test.pl b/TAO/tests/RTCORBA/Server_Protocol/run_test.pl index 6e1cafa833b..8921a85c6ec 100755 --- a/TAO/tests/RTCORBA/Server_Protocol/run_test.pl +++ b/TAO/tests/RTCORBA/Server_Protocol/run_test.pl @@ -79,7 +79,7 @@ foreach $o (@server_opts) { $SV->Spawn (); - if (PerlACE::waitforfile_timed ($iorfile, 10) == -1) { + if (PerlACE::waitforfile_timed ($iorfile, $PerlACE::wait_interval_for_process_creation) == -1) { print STDERR "ERROR: cannot find IOR file <$iorfile>\n"; $SV->Kill (); $SV->TimedWait (1); exit 1; |