20 |
|
|
21 |
diag dump( $u ) if $debug; |
diag dump( $u ) if $debug; |
22 |
|
|
23 |
ok( my $pager = Frey::Pager->new( |
ok( my $pager = Frey::ORM::Pager->new( |
24 |
fey_class => ref($u), |
fey_class => ref($u), |
25 |
item_constructor => sub { |
item_constructor => sub { |
26 |
Frey::Web::Item->new( fey_class => ref($u), @_ ); |
Frey::ORM::Item->new( fey_class => ref($u), @_ ); |
27 |
}, |
}, |
28 |
), 'pager' ); |
), 'pager' ); |
29 |
ok( $pager->pager->current_page( 2 ), 'current_page 2' ); |
ok( $pager->pager->current_page( 2 ), 'current_page 2' ); |