1 files changed, 8 insertions, 9 deletions
diff --git a/TAO/tests/NestedUpcall/MT_Client_Test/run_test.pl b/TAO/tests/NestedUpcall/MT_Client_Test/run_test.pl
index 3a17e045cfd..da9f7ca749a 100755
--- a/TAO/tests/NestedUpcall/MT_Client_Test/run_test.pl
+++ b/TAO/tests/NestedUpcall/MT_Client_Test/run_test.pl
@@ -1,10 +1,9 @@
+#$Id$
+# -*- perl -*-
 eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
     & eval 'exec perl -S $0 $argv:q'
     if 0;
 
-# $Id$
-# -*- perl -*-
-
 unshift @INC, '../../../../bin';
 require Process;
 require ACEutils;
@@ -18,20 +17,20 @@ $ior2file = "server2.ior";
 unlink $ior1file;
 unlink $ior2file;
 
-$SV1 = Process::Create ($EXEPREFIX."server".$Process::EXE_EXT,
+$SV1 = Process::Create ($EXEPREFIX."server".$Process::EXE_EXT, 
                         " -ORBport $server1_port -o $ior1file ".
-                        " -ORBobjrefstyle url");
+			" -ORBobjrefstyle url");
 
-$SV2 = Process::Create ($EXEPREFIX."server".$Process::EXE_EXT,
+$SV2 = Process::Create ($EXEPREFIX."server".$Process::EXE_EXT, 
                         " -ORBport $server2_port -o $ior2file ".
-                        " -ORBobjrefstyle url");
+			" -ORBobjrefstyle url");
 
 ACE::waitforfile ($ior1file);
 ACE::waitforfile ($ior2file);
 
 $status = system ($EXEPREFIX."client".$Process::EXE_EXT.
-                  " -ORBport $client_port ".
-                  " -f $ior1file -g $ior2file -n 2 -i 10 -s 5");
+		  " -ORBport $client_port ".
+		  " -f $ior1file -g $ior2file -n 2 -i 10 -s 5");
 
 $SV1->Kill (); $SV1->Wait ();
 $SV2->Kill (); $SV2->Wait ();