summaryrefslogtreecommitdiff
path: root/CIAO/examples/Hello/descriptors/run_test.pl
diff options
context:
space:
mode:
authorJohnny Willemsen <jwillemsen@remedy.nl>2007-04-19 18:30:52 +0000
committerJohnny Willemsen <jwillemsen@remedy.nl>2007-04-19 18:30:52 +0000
commitffa0b854e45a1af19cf2de6856207afc08d55731 (patch)
treef84d1ebef1154efa7cafd7820b988e61d1fadf06 /CIAO/examples/Hello/descriptors/run_test.pl
parent1492fcec4da0484de095480d4555a3e0f8ec6185 (diff)
downloadATCD-ffa0b854e45a1af19cf2de6856207afc08d55731.tar.gz
Thu Apr 19 18:29:12 UTC 2007 Johnny Willemsen <jwillemsen@remedy.nl>
Diffstat (limited to 'CIAO/examples/Hello/descriptors/run_test.pl')
-rwxr-xr-xCIAO/examples/Hello/descriptors/run_test.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/CIAO/examples/Hello/descriptors/run_test.pl b/CIAO/examples/Hello/descriptors/run_test.pl
index 1801093f2b3..e1eb3434d54 100755
--- a/CIAO/examples/Hello/descriptors/run_test.pl
+++ b/CIAO/examples/Hello/descriptors/run_test.pl
@@ -103,7 +103,7 @@ $NS->Spawn ();
print STDERR "Starting Naming Service\n";
-if (PerlACE::waitforfile_timed ($nsior, 10) == -1)
+if (PerlACE::waitforfile_timed ($nsior, $PerlACE::wait_interval_for_process_creation) == -1)
{
print STDERR "ERROR: cannot find naming service IOR file\n";
$NS->Kill ();