--- trunk/t/60-a3c-hreduorg.t 2008/07/11 23:01:54 102 +++ trunk/t/60-a3c-hreduorg.t 2008/07/13 12:22:14 106 @@ -4,7 +4,7 @@ my $debug = shift @ARGV; -use Test::More tests => 8; +use Test::More tests => 15; use lib 'lib'; #use Devel::LeakTrace::Fast; @@ -19,14 +19,11 @@ diag dump( $u ) if $debug; -ok( my $i = $u->rows, 'rows' ); +ok( my $i = $u->collection( 10, 3 ), 'collection' ); isa_ok( $i, 'Fey::Object::Iterator' ); diag dump( $i ) if $debug; -my $more = 3; - while ( $u = $i->next ) { isa_ok( $u, 'A3C::HrEduOrg' ); - last unless --$more; }