summaryrefslogtreecommitdiff
path: root/TAO/tests/RTCORBA/Server_Protocol/run_test.pl
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tests/RTCORBA/Server_Protocol/run_test.pl')
-rwxr-xr-xTAO/tests/RTCORBA/Server_Protocol/run_test.pl3
1 files changed, 2 insertions, 1 deletions
diff --git a/TAO/tests/RTCORBA/Server_Protocol/run_test.pl b/TAO/tests/RTCORBA/Server_Protocol/run_test.pl
index c50cc581cb1..f742cf024fa 100755
--- a/TAO/tests/RTCORBA/Server_Protocol/run_test.pl
+++ b/TAO/tests/RTCORBA/Server_Protocol/run_test.pl
@@ -11,6 +11,7 @@ use PerlACE::Run_Test;
$iorfile = PerlACE::LocalFile ("test.ior");
unlink $iorfile;
+$status = 0;
$server_reverse_conf = PerlACE::LocalFile ("server_reverse.conf");
$server_iiop_conf = PerlACE::LocalFile ("server_iiop.conf");
@@ -66,7 +67,7 @@ if ($^O eq "MSWin32") {
$comments[3] =
"* Overriding ORB Default Server Protocol Policy in the POA\n"
- ." (POA Server Protocol set to IIOP only): \n",
+ ." (POA Server Protocol set to IIOP only): \n";
}