diff options
Diffstat (limited to 'ldap_wizard/Ldap.pm')
| -rw-r--r-- | ldap_wizard/Ldap.pm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/ldap_wizard/Ldap.pm b/ldap_wizard/Ldap.pm index 9d8eff23..5ffa5a0d 100644 --- a/ldap_wizard/Ldap.pm +++ b/ldap_wizard/Ldap.pm @@ -7,7 +7,6 @@ package MDK::Wizard::Ldap; use lib qw(/usr/lib/libDrakX); use ugtk2 qw(:create); use strict; -#use MDK::Wizard::ldapdef; use ldapdef; use common; use standalone; @@ -49,7 +48,7 @@ my $o = { nom => '', prenom => '', }, - #needed_rpm => [ 'openldap-server','openldap-clients' ], + needed_rpm => [ 'openldap-servers','openldap-clients' ], defaultimage => "$ENV{__WIZ_HOME__}ldap_wizard/images/ldap.png", }; @@ -299,10 +298,6 @@ sub init_ldap { $o->{var}{rootdn} =~ /cn=(\w+),/ and my $cnadmin = $1; - print "$o->{var}{rootdn}\n"; - print "$o->{var}{rootpass}\n"; - print "$o->{var}{srv}\n"; - my $LDAP; open($LDAP, "| ldapadd -x -D '$o->{var}{rootdn}' -w $o->{var}{rootpass}"); |