File Coverage

blib/lib/HTTP/MobileAttribute/Plugin.pm
Criterion Covered Total %
statement 14 14 100.0
branch 2 2 100.0
condition n/a
subroutine 5 5 100.0
pod 1 2 50.0
total 22 23 95.6


line stmt bran cond sub pod time code
1             package HTTP::MobileAttribute::Plugin;
2 31     31   511 use strict;
  31         75  
  31         1024  
3 31     31   159 use warnings;
  31         60  
  31         765  
4 31     31   152 use base qw/Class::Component::Plugin/;
  31         59  
  31         17504  
5              
6             __PACKAGE__->mk_classdata('depends' => []);
7              
8             sub register {
9 475     475 0 100861 my ($self, $c) = @_;
10              
11 475         636 $c->autoload_plugins( @{ $self->depends } );
  475         1590  
12 475         26519 $self->SUPER::register($c);
13             }
14              
15             sub class_component_load_attribute_resolver {
16 1605 100   1605 1 368994 $_[1] eq 'CarrierMethod' ? "HTTP::MobileAttribute::Attribute::CarrierMethod" : undef
17             }
18              
19             1;