From 0205645c62a5b2ba7cb1785b4a71435c16b04eba Mon Sep 17 00:00:00 2001
From: coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>
Date: Thu, 17 Jun 1999 15:12:48 +0000
Subject: ChangeLogTag:Thu Jun 17 10:05:53 1999  Carlos O'Ryan 
 <coryan@cs.wustl.edu>

---
 TAO/examples/POA/Forwarding/run_test.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'TAO/examples/POA/Forwarding')

diff --git a/TAO/examples/POA/Forwarding/run_test.pl b/TAO/examples/POA/Forwarding/run_test.pl
index 5ba649c1316..afb11d01a92 100755
--- a/TAO/examples/POA/Forwarding/run_test.pl
+++ b/TAO/examples/POA/Forwarding/run_test.pl
@@ -78,7 +78,7 @@ sub run_test
     cleanup_ior ();
 
     # Run the servers
-    $SRV1 = Process::Create  (".".$DIR_SEPARATOR."server".$Process::EXE_EXT,
+    $SRV1 = Process::Create  (".".$DIR_SEPARATOR."server".$EXE_EXT,
                              "$server1args");
     print STDERR ("server $server1args\n");
 
@@ -88,7 +88,7 @@ sub run_test
       exit 1;
     }
 
-    $SRV2 = Process::Create  (".".$DIR_SEPARATOR."server".$Process::EXE_EXT,
+    $SRV2 = Process::Create  (".".$DIR_SEPARATOR."server".$EXE_EXT,
                              "$server2args");
     print STDERR ("server $server2args\n");
 
@@ -100,7 +100,7 @@ sub run_test
     }
 
     if ($server3args ne "") {
-      $SRV3 = Process::Create (".".$DIR_SEPARATOR."server".$Process::EXE_EXT,
+      $SRV3 = Process::Create (".".$DIR_SEPARATOR."server".$EXE_EXT,
 			       "$server3args");
 
       if (ACE::waitforfile_timed ("server3", 5) == -1) {
@@ -113,7 +113,7 @@ sub run_test
     }
 
     # Run the client and block until completion
-    $CL = Process::Create ($EXEPREFIX."client".$Process::EXE_EXT,
+    $CL = Process::Create ($EXEPREFIX."client".$EXE_EXT,
 			   " $clientargs");
     print STDERR ("client $clientargs\n");
 
-- 
cgit v1.2.1