File Coverage

blib/lib/Acme/PrettyCure/Girl/Role/Futari.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package Acme::PrettyCure::Girl::Role::Futari;
2 5     5   4451 use utf8;
  5         12  
  5         43  
3 5     5   146 use Moo::Role;
  5         10  
  5         36  
4              
5             around 'transform' => sub {
6             my $transform = shift;
7             my ($self, $buddy) = @_;
8              
9             $self->$transform;
10              
11             unless ($buddy->is_precure) {
12             $buddy->is_precure(1);
13             }
14             };
15              
16              
17             1;
18