Fix errors on remove and update
This commit is contained in:
parent
dd3445ca95
commit
49a1c9a8b9
@ -90,10 +90,10 @@ sub _remove($$)
|
||||
|
||||
my @data;
|
||||
for (my $i = $args->{unamed}; $i > 0; $i--) {
|
||||
push @data, $i;
|
||||
push @data, $args->{param}{$i};
|
||||
}
|
||||
|
||||
return LDAP::delete_attributes($ldap, $dn, $cnt_type, @data);
|
||||
return LDAP::delete_attribute($ldap, $dn, $cnt_type, @data);
|
||||
}
|
||||
|
||||
sub _update($$)
|
||||
@ -108,7 +108,7 @@ sub _update($$)
|
||||
|
||||
my @data;
|
||||
for (my $i = $args->{unamed}; $i > 0; $i--) {
|
||||
push @data, $i;
|
||||
push @data, $args->{param}{$i};
|
||||
}
|
||||
|
||||
return LDAP::update_attribute($ldap, $dn, $cnt_type, @data);
|
||||
|
Reference in New Issue
Block a user