File Coverage

blib/lib/MooX/PluginKit/ConsumerBase.pm
Criterion Covered Total %
statement 15 18 83.3
branch 1 2 50.0
condition n/a
subroutine 5 8 62.5
pod 0 5 0.0
total 21 33 63.6


line stmt bran cond sub pod time code
1             package MooX::PluginKit::ConsumerBase;
2              
3             our $VERSION = '0.05';
4              
5             =head1 NAME
6              
7             MooX::PluginKit::ConsumerBase - Parent class for PluginKit consumers.
8              
9             =head2 DESCRIPTION
10              
11             This module is a total hack to get around
12             L.
13              
14             =cut
15              
16 3     3   1674 use Moo::Object qw();
  3         7  
  3         81  
17              
18 3     3   14 use strictures 2;
  3         20  
  3         105  
19 3     3   481 use namespace::clean;
  3         6  
  3         17  
20              
21             sub new {
22 18     18 0 176 my $class = shift;
23              
24 18         312 my $args = $class->BUILDARGS( @_ );
25 18         60 my $factory = $args->{plugin_factory};
26 18 50       103 $class = $factory->build_class( $class ) if $factory;
27              
28 18         4757 return bless {}, $class;
29             }
30              
31 36     36 0 106 sub BUILDARGS { Moo::Object::BUILDARGS(@_) }
32 0     0 0   sub NORMALIZE_BUILDARGS { Moo::Object::NORMALIZE_BUILDARGS(@_) }
33 0     0 0   sub TRANSFORM_BUILDARGS { Moo::Object::TRANSFORM_BUILDARGS(@_) }
34 0     0 0   sub FINALIZE_BUILDARGS { Moo::Object::FINALIZE_BUILDARGS(@_) }
35              
36             1;
37             __END__