File Coverage

lib/DBIx/Skinny/Pager/ResultSet.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 3 0.0
total 17 20 85.0


line stmt bran cond sub pod time code
1             package DBIx::Skinny::Pager::ResultSet;
2 7     7   40 use strict;
  7         88  
  7         280  
3 7     7   40 use warnings;
  7         14  
  7         870  
4              
5             sub new {
6 2     2 0 9 my ($class, %args) = @_;
7 2         8 my $self = +{ %args };
8 2         7 bless $self, $class;
9 2         8 return $self;
10             }
11              
12             sub iterator {
13 2     2 0 10 $_[0]->{iterator};
14             }
15              
16             sub pager {
17 2     2 0 543 $_[0]->{pager};
18             }
19              
20             1;