From a6e2cf01cd5dd37d3bb5964afa28b84b378a6f0a Mon Sep 17 00:00:00 2001
From: "William R. Otte" <wotte@dre.vanderbilt.edu>
Date: Fri, 28 Jul 2006 00:51:55 +0000
Subject: Fri Jul 28 00:44:26 UTC 2006  William R. Otte 
 <wotte@dre.vanderbilt.edu>

---
 TAO/tests/CSD_Strategy_Tests/Broken/run_test.pl          | 2 +-
 TAO/tests/CSD_Strategy_Tests/TP_Test_1/run_test.pl       | 2 +-
 TAO/tests/CSD_Strategy_Tests/TP_Test_2/run_test.pl       | 2 +-
 TAO/tests/CSD_Strategy_Tests/TP_Test_3/run_test.pl       | 2 +-
 TAO/tests/CSD_Strategy_Tests/TP_Test_4/run_test.pl       | 2 +-
 TAO/tests/CSD_Strategy_Tests/TP_Test_Dynamic/run_test.pl | 2 +-
 TAO/tests/CSD_Strategy_Tests/TP_Test_Static/run_test.pl  | 2 +-
 7 files changed, 7 insertions(+), 7 deletions(-)

(limited to 'TAO/tests/CSD_Strategy_Tests')

diff --git a/TAO/tests/CSD_Strategy_Tests/Broken/run_test.pl b/TAO/tests/CSD_Strategy_Tests/Broken/run_test.pl
index 6d3802bc59f..399443c5b71 100755
--- a/TAO/tests/CSD_Strategy_Tests/Broken/run_test.pl
+++ b/TAO/tests/CSD_Strategy_Tests/Broken/run_test.pl
@@ -5,7 +5,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
 # $Id$
 # -*- perl -*-
 
-use lib '../../../../bin';
+use lib "$ENV{ACE_ROOT}/bin";
 use PerlACE::Run_Test;
 
 my $status = 0;
diff --git a/TAO/tests/CSD_Strategy_Tests/TP_Test_1/run_test.pl b/TAO/tests/CSD_Strategy_Tests/TP_Test_1/run_test.pl
index 1ff6338702b..311aacb207e 100755
--- a/TAO/tests/CSD_Strategy_Tests/TP_Test_1/run_test.pl
+++ b/TAO/tests/CSD_Strategy_Tests/TP_Test_1/run_test.pl
@@ -5,7 +5,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
 # $Id$
 # -*- perl -*-
 
-use lib '../../../../bin';
+use lib "$ENV{ACE_ROOT}/bin";
 use PerlACE::Run_Test;
 
 $iorfile = PerlACE::LocalFile ("server.ior");
diff --git a/TAO/tests/CSD_Strategy_Tests/TP_Test_2/run_test.pl b/TAO/tests/CSD_Strategy_Tests/TP_Test_2/run_test.pl
index 37fd19f21f6..7da2894591d 100755
--- a/TAO/tests/CSD_Strategy_Tests/TP_Test_2/run_test.pl
+++ b/TAO/tests/CSD_Strategy_Tests/TP_Test_2/run_test.pl
@@ -5,7 +5,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
 # $Id$
 # -*- perl -*-
 
-use lib '../../../../bin';
+use lib "$ENV{ACE_ROOT}/bin";
 use PerlACE::Run_Test;
 
 my $status = 0;
diff --git a/TAO/tests/CSD_Strategy_Tests/TP_Test_3/run_test.pl b/TAO/tests/CSD_Strategy_Tests/TP_Test_3/run_test.pl
index 13aac1fa8c9..654bb11358f 100755
--- a/TAO/tests/CSD_Strategy_Tests/TP_Test_3/run_test.pl
+++ b/TAO/tests/CSD_Strategy_Tests/TP_Test_3/run_test.pl
@@ -5,7 +5,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
 # $Id$
 # -*- perl -*-
 
-use lib '../../../../bin';
+use lib "$ENV{ACE_ROOT}/bin";
 use PerlACE::Run_Test;
 
 my $status = 0;
diff --git a/TAO/tests/CSD_Strategy_Tests/TP_Test_4/run_test.pl b/TAO/tests/CSD_Strategy_Tests/TP_Test_4/run_test.pl
index f50c6616e1e..be5769d3558 100755
--- a/TAO/tests/CSD_Strategy_Tests/TP_Test_4/run_test.pl
+++ b/TAO/tests/CSD_Strategy_Tests/TP_Test_4/run_test.pl
@@ -5,7 +5,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
 # $Id$
 # -*- perl -*-
 
-use lib '../../../../bin';
+use lib "$ENV{ACE_ROOT}/bin";
 use PerlACE::Run_Test;
 
 my $status = 0;
diff --git a/TAO/tests/CSD_Strategy_Tests/TP_Test_Dynamic/run_test.pl b/TAO/tests/CSD_Strategy_Tests/TP_Test_Dynamic/run_test.pl
index de69f709455..fee5bc7bc29 100755
--- a/TAO/tests/CSD_Strategy_Tests/TP_Test_Dynamic/run_test.pl
+++ b/TAO/tests/CSD_Strategy_Tests/TP_Test_Dynamic/run_test.pl
@@ -5,7 +5,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
 # $Id$
 # -*- perl -*-
 
-use lib '../../../../bin';
+use lib "$ENV{ACE_ROOT}/bin";
 use PerlACE::Run_Test;
 
 $status = 0;
diff --git a/TAO/tests/CSD_Strategy_Tests/TP_Test_Static/run_test.pl b/TAO/tests/CSD_Strategy_Tests/TP_Test_Static/run_test.pl
index 7e34ffa58ba..e9289a8d63c 100755
--- a/TAO/tests/CSD_Strategy_Tests/TP_Test_Static/run_test.pl
+++ b/TAO/tests/CSD_Strategy_Tests/TP_Test_Static/run_test.pl
@@ -5,7 +5,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
 # $Id$
 # -*- perl -*-
 
-use lib '../../../../bin';
+use lib "$ENV{ACE_ROOT}/bin";
 use PerlACE::Run_Test;
 
 $iorfile = PerlACE::LocalFile ("server.ior");
-- 
cgit v1.2.1