diff options
author | nanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2002-10-21 19:54:39 +0000 |
---|---|---|
committer | nanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2002-10-21 19:54:39 +0000 |
commit | a8ffc62c2c8231d2d3b7ed2f2187e2be3bc41e15 (patch) | |
tree | af0a96ab6782d9a79a11081629928dea0550212e /TAO/examples | |
parent | 92d3afd616e005a76f20f1bb72650fa55bd16f56 (diff) | |
download | ATCD-a8ffc62c2c8231d2d3b7ed2f2187e2be3bc41e15.tar.gz |
ChangeLogTag:Mon Oct 21 14:29:54 2002 Nanbor Wang <nanbor@cs.wustl.edu>
Diffstat (limited to 'TAO/examples')
-rwxr-xr-x | TAO/examples/AMH/Sink_Server/run_test.pl | 4 | ||||
-rwxr-xr-x | TAO/examples/Simple/time-date/run_test.pl | 2 |
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; |