--- lib/A3C/LDAP.pm 2008/03/31 21:11:45 47 +++ lib/A3C/LDAP.pm 2008/04/01 17:32:59 53 @@ -109,6 +109,7 @@ 'Organization', # optional params limit => $limit, + filter => '(uid=foobar)', ); =cut @@ -128,6 +129,9 @@ my $filter = $collection2filter->{$model}; die "unknown model $model" unless $filter; + # add user filter + $filter = '(&' . $filter . $args->{filter} . ')' if $args->{filter}; + $self->search( base => $self->base, filter => $filter,