summaryrefslogtreecommitdiffstats
path: root/ldap_wizard/Ldap.pm
diff options
context:
space:
mode:
Diffstat (limited to 'ldap_wizard/Ldap.pm')
-rw-r--r--ldap_wizard/Ldap.pm7
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}");