summaryrefslogtreecommitdiff
path: root/CIAO/examples/Hello/descriptors/run_test.pl
diff options
context:
space:
mode:
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 ();