diff options
author | Johnny Willemsen <jwillemsen@remedy.nl> | 2007-04-19 18:30:52 +0000 |
---|---|---|
committer | Johnny Willemsen <jwillemsen@remedy.nl> | 2007-04-19 18:30:52 +0000 |
commit | ffa0b854e45a1af19cf2de6856207afc08d55731 (patch) | |
tree | f84d1ebef1154efa7cafd7820b988e61d1fadf06 /CIAO/examples/Hello/descriptors/run_test.pl | |
parent | 1492fcec4da0484de095480d4555a3e0f8ec6185 (diff) | |
download | ATCD-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-x | CIAO/examples/Hello/descriptors/run_test.pl | 2 |
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 (); |