diff options
| author | Antoine Ginies <aginies@mandriva.com> | 2005-04-11 16:48:27 +0000 |
|---|---|---|
| committer | Antoine Ginies <aginies@mandriva.com> | 2005-04-11 16:48:27 +0000 |
| commit | f8f3fe118a814e36fe605e7d4f0293444a3c5475 (patch) | |
| tree | f73fa6778f68e06ea188cc42c7a4bd1b2391c328 | |
| parent | c3f729cadb6ed51ec4aab7f31e1afb2dde03ba5d (diff) | |
| download | drakwizard-f8f3fe118a814e36fe605e7d4f0293444a3c5475.tar drakwizard-f8f3fe118a814e36fe605e7d4f0293444a3c5475.tar.gz drakwizard-f8f3fe118a814e36fe605e7d4f0293444a3c5475.tar.bz2 drakwizard-f8f3fe118a814e36fe605e7d4f0293444a3c5475.tar.xz drakwizard-f8f3fe118a814e36fe605e7d4f0293444a3c5475.zip | |
test domainname with domainname command
| -rw-r--r-- | ldap_wizard/Ldap.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ldap_wizard/Ldap.pm b/ldap_wizard/Ldap.pm index 385d7fb0..f8152266 100644 --- a/ldap_wizard/Ldap.pm +++ b/ldap_wizard/Ldap.pm @@ -26,6 +26,7 @@ use Net::LDAP::Util qw(ldap_error_text); my $wiz = new MDK::Wizard::Wizcommon; my $wiz_domain_name = $wiz->{net}->network_get("DOMAINNAME"); my $wiz_host_name = $wiz->{net}->network_get("HOSTNAME"); +my $DOMAINNAME = chomp_(`domainname`); my $o = { name => N("Ldap wizard"), @@ -56,7 +57,7 @@ my $o = { needed_rpm => [ 'openldap-servers', 'openldap-clients', 'nss_ldap' ], defaultimage => "$ENV{__WIZ_HOME__}ldap_wizard/images/ldap.png", init => sub { - test_host_domain($wiz_host_name, $wiz_domain_name); + test_host_domain($wiz_host_name, $DOMAINNAME); } }; |