Sat Dec 8 14:53:54 UTC 2007 Johnny Willemsen <jwillemsen@remedy.nl>

1 files changed, 2 insertions, 2 deletions

diff --git a/TAO/tests/Server_Connection_Purging/run_test.pl b/TAO/tests/Server_Connection_Purging/run_test.pl
index d7d69f85562..ccaf6a19c58 100755
--- a/TAO/tests/Server_Connection_Purging/run_test.pl
+++ b/TAO/tests/Server_Connection_Purging/run_test.pl
@@ -13,14 +13,14 @@ $orbport = 10000 + PerlACE::uniqueid ();
 unlink $iorfile;
 $status = 0;
 
-$endpoint = "-ORBEndpoint iiop://localhost:$orbport";
-$clientarg = "-h localhost -p $orbport";
 if (PerlACE::is_vxworks_test()) {
 $endpoint = "-ORBEndpoint iiop://".$ENV{'ACE_RUN_VX_TGTHOST'}.":$orbport";
 $clientarg = "-h ".$ENV{'ACE_RUN_VX_TGTHOST'}." -p $orbport";
 $SV = new PerlACE::ProcessVX ("server", "$endpoint");
 }
 else {
+$endpoint = "-ORBEndpoint iiop://localhost:$orbport";
+$clientarg = "-h localhost -p $orbport";
 $SV = new PerlACE::Process ("server", "$endpoint");
 }