File Coverage

/tmp/.liveman/Aion-Emitter-0.1.1-0/aion!emitter.t/lib/Listener/WeightListener.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 2 0.0
total 10 12 83.3


line stmt bran cond sub pod time code
1             package Listener::WeightListener;
2              
3 1     1   564 use Aion;
  1         2  
  1         5  
4              
5             #@listen Event::BallEvent
6             sub listen {
7 1     1 0 2 my ($self, $event) = @_;
8            
9 1         15 $event->weight(12);
10             }
11              
12             #@listen Event::BallEvent#mini „Minimize version”
13             sub minimize {
14 1     1 0 2 my ($self, $event) = @_;
15            
16 1         14 $event->weight(3);
17             }
18              
19             1;