summaryrefslogtreecommitdiff
path: root/TAO/tests/Muxed_GIOP_Versions/run_test.pl
diff options
context:
space:
mode:
authorJohnny Willemsen <jwillemsen@remedy.nl>2007-04-18 19:17:57 +0000
committerJohnny Willemsen <jwillemsen@remedy.nl>2007-04-18 19:17:57 +0000
commit2c649840d72e4318f52b6bea5679e431420ab2a9 (patch)
tree415585c91231f563dc2b9aa99b47ac9d6122c441 /TAO/tests/Muxed_GIOP_Versions/run_test.pl
parent7893249ffc4da76c687d648f76a776969cc9325f (diff)
downloadATCD-2c649840d72e4318f52b6bea5679e431420ab2a9.tar.gz
Wed Apr 18 19:15:12 UTC 2007 Johnny Willemsen <jwillemsen@remedy.nl>
Diffstat (limited to 'TAO/tests/Muxed_GIOP_Versions/run_test.pl')
-rwxr-xr-xTAO/tests/Muxed_GIOP_Versions/run_test.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/TAO/tests/Muxed_GIOP_Versions/run_test.pl b/TAO/tests/Muxed_GIOP_Versions/run_test.pl
index 6a85e18728d..7e5114ed218 100755
--- a/TAO/tests/Muxed_GIOP_Versions/run_test.pl
+++ b/TAO/tests/Muxed_GIOP_Versions/run_test.pl
@@ -55,7 +55,7 @@ print STDERR "***** Start the server*** \n" if $verbose;
$SV->Spawn ();
-if (PerlACE::waitforfile_timed ($iorfile, 50) == -1) {
+if (PerlACE::waitforfile_timed ($iorfile, $PerlACE::wait_interval_for_process_creation) == -1) {
print STDERR "ERROR: cannot find file <$iorfile>\n";
$SV->Kill ();
exit 1;