summaryrefslogtreecommitdiff
path: root/TAO/tests/Bug_1627_Regression/run_test.pl
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tests/Bug_1627_Regression/run_test.pl')
-rwxr-xr-xTAO/tests/Bug_1627_Regression/run_test.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/TAO/tests/Bug_1627_Regression/run_test.pl b/TAO/tests/Bug_1627_Regression/run_test.pl
index 99aa9f856da..e34b10f5fa7 100755
--- a/TAO/tests/Bug_1627_Regression/run_test.pl
+++ b/TAO/tests/Bug_1627_Regression/run_test.pl
@@ -28,7 +28,7 @@ $ENV {'TAO_ORBENDPOINT'} = "iiop://localhost:$port";
$SERVER->Spawn();
# We don't need the IOR file but we can wait on the file
-if (PerlACE::waitforfile_timed ($server_ior_file, 10) == -1)
+if (PerlACE::waitforfile_timed ($server_ior_file, $PerlACE::wait_interval_for_process_creation) == -1)
{
print STDERR "ERROR: cannot find $server_ior_file\n";
$SERVER->Kill();