diff options
Diffstat (limited to 'DevGuideExamples/Multithreading/ThreadPerConnection/run_test.pl')
-rwxr-xr-x | DevGuideExamples/Multithreading/ThreadPerConnection/run_test.pl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/DevGuideExamples/Multithreading/ThreadPerConnection/run_test.pl b/DevGuideExamples/Multithreading/ThreadPerConnection/run_test.pl index 3c8b6d058ce..67e95fc1752 100755 --- a/DevGuideExamples/Multithreading/ThreadPerConnection/run_test.pl +++ b/DevGuideExamples/Multithreading/ThreadPerConnection/run_test.pl @@ -39,6 +39,12 @@ $client4->DeleteFile($iorbase); my $hostname = $server->HostName (); +# Copy configuration file first +if ($server->PutFile ($svcbase) == -1) { + print STDERR "ERROR: cannot set file <$server_svcfile>\n"; + exit 1; +} + $SV = $server->CreateProcess ("MessengerServer", "-ORBdebuglevel $debug_level " . "-ORBSvcConf $server_svcfile " . |