--- trunk/t/02-frey-pager.t 2008/07/16 14:17:46 143 +++ trunk/t/02-frey-pager.t 2008/10/31 19:53:50 214 @@ -4,7 +4,7 @@ my $debug = @ARGV ? 1 : 0; -use Test::More tests => 13; +use Test::More tests => 7; use lib 'lib'; use Data::Dump qw/dump/; @@ -19,15 +19,17 @@ debug => $debug, fey_class => 'Strix::User', item_constructor => sub { - warn "## item_constructor ",dump( @_ ); + warn "## item_constructor ",dump( @_ ) if $debug; Frey::Web::Item->new( fey_class => 'Strix::User', @_ ); }, ), 'new' ); isa_ok( $o, 'Frey::Pager' ); diag dump( $o ) if $debug; -ok( $o->update_collection, 'update_collection' ); +diag dump( $o->update_collection ); -diag dump( $o->items ); +ok( ! $o->update_collection, 'update_collection' ); + +diag dump( $o->items ) if $debug; ok( my $l = $o->last_item, 'last_item' );