File Coverage

blib/lib/DBIx/DataModel/Schema/ResultAs.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 19 20 95.0


line stmt bran cond sub pod time code
1             #----------------------------------------------------------------------
2             package DBIx::DataModel::Schema::ResultAs;
3             #----------------------------------------------------------------------
4 7     7   3993 use strict;
  7         17  
  7         209  
5 7     7   43 use warnings;
  7         16  
  7         218  
6 7     7   40 use DBIx::DataModel::Meta::Utils qw/define_abstract_methods/;
  7         15  
  7         364  
7              
8 7     7   45 use Carp::Clan qw[^(DBIx::DataModel::|SQL::Abstract)];
  7         18  
  7         50  
9              
10             define_abstract_methods(__PACKAGE__, qw/get_result/);
11              
12             sub new {
13 129     129 0 251 my $class = shift;
14              
15 129         425 return bless {@_}, $class;
16             }
17              
18             1;
19              
20             __END__