File Coverage

lib/BalanceOfPower/Targets/Role/Target.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 15 16 93.7


line stmt bran cond sub pod time code
1             package BalanceOfPower::Targets::Role::Target;
2             $BalanceOfPower::Targets::Role::Target::VERSION = '0.400115';
3 13     13   4975 use strict;
  13         29  
  13         328  
4 13     13   119 use v5.10;
  13         34  
5 13     13   48 use Moo::Role;
  13         16  
  13         71  
6              
7             has target_obj => (
8             is => 'rw',
9             );
10             has target_to_load => (
11             is => 'ro'
12             );
13             has countdown => (
14             is => 'rw',
15             );
16              
17             sub click
18             {
19 7     7 0 11 my $self = shift;
20 7         29 $self->countdown($self->countdown -1);
21 7         26 return $self->countdown == 0;
22             }
23             1;
24