/[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 42 by dpavlin, Sun Mar 30 16:58:21 2008 UTC revision 47 by dpavlin, Mon Mar 31 21:11:45 2008 UTC
# Line 8  test LDAP module Line 8  test LDAP module
8    
9  =cut  =cut
10    
11  use Jifty::Test tests => 19;  use Jifty::Test tests => 25;
12    
13  use_ok('A3C::LDAP');  use_ok('A3C::LDAP');
14    
# Line 33  foreach my $i ( 1 .. 10 ) { Line 33  foreach my $i ( 1 .. 10 ) {
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  is( $collection->count, 3, 'count' );  }

Legend:
Removed from v.42  
changed lines
  Added in v.47

  ViewVC Help
Powered by ViewVC 1.1.26