diff options
Diffstat (limited to 'TAO/tests/Portable_Interceptors/PICurrent/run_test.pl')
-rwxr-xr-x | TAO/tests/Portable_Interceptors/PICurrent/run_test.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/TAO/tests/Portable_Interceptors/PICurrent/run_test.pl b/TAO/tests/Portable_Interceptors/PICurrent/run_test.pl index 64932b1e51d..1f767aa5fe2 100755 --- a/TAO/tests/Portable_Interceptors/PICurrent/run_test.pl +++ b/TAO/tests/Portable_Interceptors/PICurrent/run_test.pl @@ -30,7 +30,7 @@ sub DoTest unlink $file; $SV->Spawn (); - if (PerlACE::waitforfile_timed ($file, 15) == -1) { + if (PerlACE::waitforfile_timed ($file, $PerlACE::wait_interval_for_process_creation) == -1) { print STDERR "ERROR: cannot find file <$file>\n"; $SV->Kill (); return 1; |