/[A3C]/t/10-ldap.t
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /t/10-ldap.t

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 111 by dpavlin, Thu May 1 17:06:02 2008 UTC revision 112 by dpavlin, Wed May 14 16:50:49 2008 UTC
# Line 40  foreach my $i ( 1 .. 10 ) { Line 40  foreach my $i ( 1 .. 10 ) {
40  #       $entry->dump;  #       $entry->dump;
41  }  }
42    
43    my $org_oc = $ldap->objectClass->{organization};
44    
45  foreach my $limit ( 3, 7, 14 ) {  foreach my $limit ( 3, 7, 14 ) {
46          ok( my $collection = $ldap->collection('Organization', limit => $limit), "collection Organization limit = $limit" );          ok( my $collection = $ldap->collection( $org_oc, limit => $limit), "collection $org_oc limit = $limit" );
47          isa_ok( $collection, 'A3C::Model::OrganizationCollection' );          isa_ok( $collection, "A3C::Model::${org_oc}Collection" );
48          is( $collection->count, $limit, 'count' );          is( $collection->count, $limit, 'count' );
49  }  }
50    
51  ok( my $coll = $ldap->collection('Person', filter => '(HrEduPersonHomeOrg=aa-test-zz)'), 'collection with filter' );  my $person_oc = $ldap->objectClass->{person};
52    
53    ok( my $coll = $ldap->collection( $person_oc, filter => '(HrEduPersonHomeOrg=aa-test-zz)'), 'collection with filter' );
54  is( $coll->count, 0, 'no results' );  is( $coll->count, 0, 'no results' );

Legend:
Removed from v.111  
changed lines
  Added in v.112

  ViewVC Help
Powered by ViewVC 1.1.26