--- lib/A3C/LDAP/Server.pm 2008/06/26 23:29:56 224 +++ lib/A3C/LDAP/Server.pm 2008/06/27 11:38:36 225 @@ -17,6 +17,18 @@ use A3C::LDAP; use Data::Dump qw/dump/; +=head1 NAME + +A3C::LDAP::Server + +=cut + +=head1 DESCRIPTION + +Provide LDAP server functionality for L somewhat similar to C + +=cut + use constant RESULT_OK => { 'matchedDN' => '', 'errorMessage' => '', @@ -109,7 +121,7 @@ my @entries = $search->entries; warn "## got ", $search->count, " entries for $filter\n"; foreach my $entry (@entries) { - $entry->changetype('add'); # Don't record changes. +# $entry->changetype('add'); # Don't record changes. # foreach my $attr ($entry->attributes) { # if ($attr =~ /;lang-en$/) { # $entry->delete($attr);