8 |
|
|
9 |
=cut |
=cut |
10 |
|
|
11 |
use Jifty::Test tests => 19; |
use Jifty::Test tests => 27; |
12 |
|
|
13 |
use_ok('A3C::LDAP'); |
use_ok('A3C::LDAP'); |
14 |
|
|
33 |
# $entry->dump; |
# $entry->dump; |
34 |
} |
} |
35 |
|
|
36 |
ok( my $collection = $ldap->collection('Organization', 3), 'collection Organization' ); |
foreach my $limit ( 3, 7, 14 ) { |
37 |
|
ok( my $collection = $ldap->collection('Organization', limit => $limit), "collection Organization limit = $limit" ); |
38 |
isa_ok( $collection, 'A3C::Model::OrganizationCollection' ); |
isa_ok( $collection, 'A3C::Model::OrganizationCollection' ); |
39 |
|
is( $collection->count, $limit, 'count' ); |
40 |
|
} |
41 |
|
|
42 |
is( $collection->count, 3, 'count' ); |
ok( my $coll = $ldap->collection('User', filter => '(HrEduPersonHomeOrg=aa-test-zz)'), 'collection with filter' ); |
43 |
|
is( $coll->count, 0, 'no results' ); |