summaryrefslogtreecommitdiff
path: root/TAO/examples
diff options
context:
space:
mode:
authornanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2002-10-21 19:54:39 +0000
committernanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2002-10-21 19:54:39 +0000
commita8ffc62c2c8231d2d3b7ed2f2187e2be3bc41e15 (patch)
treeaf0a96ab6782d9a79a11081629928dea0550212e /TAO/examples
parent92d3afd616e005a76f20f1bb72650fa55bd16f56 (diff)
downloadATCD-a8ffc62c2c8231d2d3b7ed2f2187e2be3bc41e15.tar.gz
ChangeLogTag:Mon Oct 21 14:29:54 2002 Nanbor Wang <nanbor@cs.wustl.edu>
Diffstat (limited to 'TAO/examples')
-rwxr-xr-xTAO/examples/AMH/Sink_Server/run_test.pl4
-rwxr-xr-xTAO/examples/Simple/time-date/run_test.pl2
2 files changed, 4 insertions, 2 deletions
diff --git a/TAO/examples/AMH/Sink_Server/run_test.pl b/TAO/examples/AMH/Sink_Server/run_test.pl
index e71b8605b50..65254b4c6e5 100755
--- a/TAO/examples/AMH/Sink_Server/run_test.pl
+++ b/TAO/examples/AMH/Sink_Server/run_test.pl
@@ -26,7 +26,9 @@ $iorfile = PerlACE::LocalFile("amh.ior");
unlink $iorfile;
$delay_time = $reply_delay_time*1000; #convert to microseconds
-$AMH = new PerlACE::Process ("st_server", "-ORBsvcconf st_server.conf -o $iorfile -s $delay_time");
+$AMH = new PerlACE::Process ("st_server", "-ORBsvcconf st_server" .
+ "$PerlACE::svcconf_ext".
+ " -o $iorfile -s $delay_time");
$CL = new PerlACE::Process ("client", "-k file://$iorfile -n $iterations");
print STDERR "\n Starting AMH Sink Server with $reply_delay_time milliseconds delayed response: \n\n";
diff --git a/TAO/examples/Simple/time-date/run_test.pl b/TAO/examples/Simple/time-date/run_test.pl
index 4915149ec32..878cb5a5623 100755
--- a/TAO/examples/Simple/time-date/run_test.pl
+++ b/TAO/examples/Simple/time-date/run_test.pl
@@ -10,7 +10,7 @@ use PerlACE::Run_Test;
$status = 0;
$iorfile = "ior";
-$conf = PerlACE::LocalFile ("client.conf");
+$conf = PerlACE::LocalFile ("client" . "$PerlACE::svcconf_ext");
# Remove the file before starting the test.
unlink $iorfile;