File Coverage

blib/lib/Gears/Component.pm
Criterion Covered Total %
statement 13 13 100.0
branch 2 2 100.0
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 18 19 94.7


line stmt bran cond sub pod time code
1             package Gears::Component;
2             $Gears::Component::VERSION = '0.101';
3 1     1   738 use v5.40;
  1         3  
4 1     1   8 use Mooish::Base -standard;
  1         2  
  1         14  
5              
6             has param 'app' => (
7             isa => InstanceOf ['Gears::App'],
8             weak_ref => 1,
9             );
10              
11 4         6 sub BUILD ($self, $)
12 4     4 0 1492 {
  4         5  
13 4         20 $self->configure;
14 4         6 my $class = ref $self;
15              
16             # make sure superclass build method won't be called (avoid building the
17             # same elements twice)
18 4 100       5 if (exists &{"${class}::build"}) {
  4         23  
19 2         8 $self->build;
20             }
21             }
22              
23             sub configure ($self)
24             {
25             }
26              
27             sub build ($self)
28             {
29             }
30              
31             __END__