summaryrefslogtreecommitdiff
path: root/TAO/orbsvcs/tests/Simple_Naming/run_test_ft.pl
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/orbsvcs/tests/Simple_Naming/run_test_ft.pl')
-rwxr-xr-xTAO/orbsvcs/tests/Simple_Naming/run_test_ft.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/TAO/orbsvcs/tests/Simple_Naming/run_test_ft.pl b/TAO/orbsvcs/tests/Simple_Naming/run_test_ft.pl
index 9e62c2e1141..3b4ce6bede2 100755
--- a/TAO/orbsvcs/tests/Simple_Naming/run_test_ft.pl
+++ b/TAO/orbsvcs/tests/Simple_Naming/run_test_ft.pl
@@ -66,7 +66,7 @@ $test->DeleteFile($persistent_log_file);
sub name_server
{
my $args = "-u NameService -ORBMulticastDiscoveryEndpoint $multicast:$ns_multicast_port -o $test_iorfile -m 1 @_";
- my $prog = "$startdir/../../FT_Naming_Service/tao_ft_naming";
+ my $prog = "$ENV{TAO_ROOT}/orbsvcs/FT_Naming_Service/tao_ft_naming";
$SV = $test->CreateProcess ("$prog", "$args");