diff options
| author | mitza <mitza@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2010-03-19 14:22:53 +0000 |
|---|---|---|
| committer | mitza <mitza@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2010-03-19 14:22:53 +0000 |
| commit | 59ad73a5799833c09c9d4e32a4d68162ead63010 (patch) | |
| tree | a018759aa1e9b726e1a0f6243bd631e86960d608 /TAO/orbsvcs/DevGuideExamples | |
| parent | 5dca659588597c41c44144df59d2e1c44843420e (diff) | |
| download | ATCD-59ad73a5799833c09c9d4e32a4d68162ead63010.tar.gz | |
ChangeLogTag: Fri Mar 19 14:18:40 UTC 2010 Adam Mitz <mitza@ociweb.com>
Diffstat (limited to 'TAO/orbsvcs/DevGuideExamples')
| -rwxr-xr-x | TAO/orbsvcs/DevGuideExamples/NamingService/corbaname_Messenger/run_test.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/TAO/orbsvcs/DevGuideExamples/NamingService/corbaname_Messenger/run_test.pl b/TAO/orbsvcs/DevGuideExamples/NamingService/corbaname_Messenger/run_test.pl index 650780eb90c..0f0aec8306e 100755 --- a/TAO/orbsvcs/DevGuideExamples/NamingService/corbaname_Messenger/run_test.pl +++ b/TAO/orbsvcs/DevGuideExamples/NamingService/corbaname_Messenger/run_test.pl @@ -20,7 +20,7 @@ my $ns = PerlACE::TestTarget::create_target (1) || die "Create target 1 failed\n my $srv = PerlACE::TestTarget::create_target (2) || die "Create target 2 failed\n"; my $cli = PerlACE::TestTarget::create_target (3) || die "Create target 3 failed\n"; -$TARGETHOSTNAME = "localhost"; +$TARGETHOSTNAME = $ns->{'HOSTNAME'}; $def_port = 2809; $nsiorfile = "ns.ior"; |