File Coverage

blib/lib/Starch.pm
Criterion Covered Total %
statement 17 17 100.0
branch 2 2 100.0
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 24 25 96.0


line stmt bran cond sub pod time code
1             package Starch;
2             our $VERSION = '0.14';
3              
4 13     13   646808 use Moo::Object qw();
  13         14900  
  13         312  
5 13     13   4962 use Starch::Factory;
  13         137  
  13         528  
6              
7 13     13   97 use strictures 2;
  13         108  
  13         584  
8 13     13   2555 use namespace::clean;
  13         27  
  13         134  
9              
10             sub new {
11 70     70 0 27671 my $class = shift;
12 70         1532 my $args = Moo::Object->BUILDARGS( @_ );
13              
14 70         7052 my $plugins = delete( $args->{plugins} );
15 70 100       1273 my $factory = Starch::Factory->new(
16             defined($plugins) ? (plugins=>$plugins) : (),
17             );
18              
19 70         32809 return $factory->manager_class->new(
20             %$args,
21             factory => $factory,
22             );
23             }
24              
25             1;
26             __END__