summaryrefslogtreecommitdiff
path: root/TAO/tests/Bug_2935_Regression/run_test.pl
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tests/Bug_2935_Regression/run_test.pl')
-rwxr-xr-xTAO/tests/Bug_2935_Regression/run_test.pl13
1 files changed, 12 insertions, 1 deletions
diff --git a/TAO/tests/Bug_2935_Regression/run_test.pl b/TAO/tests/Bug_2935_Regression/run_test.pl
index 64a4acd9aa6..d74177e77a7 100755
--- a/TAO/tests/Bug_2935_Regression/run_test.pl
+++ b/TAO/tests/Bug_2935_Regression/run_test.pl
@@ -49,8 +49,19 @@ $middle->DeleteFile ($middlelogfilebase);
$source->DeleteFile ($sourcelogfilebase);
+my $middleconffilebase = "middle.conf";
+my $middleconffile = $middle->LocalFile ($middleconffilebase);
+
+# copy the configuation file
+if ($middle->PutFile ($middleconffilebase) == -1) {
+ print STDERR "ERROR: cannot set file <$middleconffile>\n";
+ $SV->Kill (); $SV->TimedWait (1);
+ return 1;
+}
+
+
$SV = $sink->CreateProcess ("sink", "-o $sinkiorfile -orblogfile $sinklogfile -orbdebuglevel 9");
-$MD = $middle->CreateProcess ("middle", "-o $middleiorfile -f $sinkiorfile -ORBSvcConf middle.conf -orblogfile $middlelogfile -orbdebuglevel 9");
+$MD = $middle->CreateProcess ("middle", "-o $middleiorfile -f $sinkiorfile -ORBSvcConf $middleconffile -orblogfile $middlelogfile -orbdebuglevel 9");
$CL = $source->CreateProcess ("source", "-f $middleiorfile -orblogfile $sourcelogfile -orbdebuglevel 9");
$SV->Spawn ();