diff options
Diffstat (limited to 'tests/Bug_3630_Regression/run_test.pl')
-rwxr-xr-x | tests/Bug_3630_Regression/run_test.pl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/Bug_3630_Regression/run_test.pl b/tests/Bug_3630_Regression/run_test.pl index 55adb524064..2b5d3559de4 100755 --- a/tests/Bug_3630_Regression/run_test.pl +++ b/tests/Bug_3630_Regression/run_test.pl @@ -10,6 +10,15 @@ use PerlACE::TestTarget; my $server = PerlACE::TestTarget::create_target (1) || die "Create target 1 failed\n"; +my $srvconf = "TAO Conf File.conf"; +my $server_svcconf = $server->LocalFile ($svcconf); + +if ($server->PutFile ($svcconf) == -1) { + print STDERR "ERROR: cannot set file <$server_svcconf>\n"; + exit 1; +} + + $SV = $server->CreateProcess ("server"); $server_status = $SV->Spawn (); |