summaryrefslogtreecommitdiff
path: root/TAO/tests/Server_Port_Zero
diff options
context:
space:
mode:
authorgmaxey <gmaxey@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2004-11-19 20:54:50 +0000
committergmaxey <gmaxey@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2004-11-19 20:54:50 +0000
commit6427cdba6308a95e6ed43eac3b983a5123646706 (patch)
tree5c07fabf3c1aa7deaf27df1c1b073ad4e49fcf60 /TAO/tests/Server_Port_Zero
parentf3809ce489e20a5932098c737073be2bd4165b60 (diff)
downloadATCD-6427cdba6308a95e6ed43eac3b983a5123646706.tar.gz
ChangeLogTag: Fri Nov 19 12:46:00 2004 Gary Maxey <gary.maxey@hp.com>
Diffstat (limited to 'TAO/tests/Server_Port_Zero')
-rwxr-xr-xTAO/tests/Server_Port_Zero/run_test.pl3
1 files changed, 2 insertions, 1 deletions
diff --git a/TAO/tests/Server_Port_Zero/run_test.pl b/TAO/tests/Server_Port_Zero/run_test.pl
index 690e3e04452..422f0e4e3ee 100755
--- a/TAO/tests/Server_Port_Zero/run_test.pl
+++ b/TAO/tests/Server_Port_Zero/run_test.pl
@@ -16,7 +16,8 @@ $SV = new PerlACE::Process ("server", "-o $iorfile");
$SV->Spawn ();
-if (PerlACE::waitforfile_timed ($iorfile, 5) == -1) {
+if (PerlACE::waitforfile_timed ($iorfile,
+ $PerlACE::wait_interval_for_process_creation) == -1) {
print STDERR "ERROR: cannot find file <$iorfile>\n";
$SV->Kill (); $SV->TimedWait (1);
exit 1;