File Coverage

blib/lib/UAV/Pilot/Video/Mock/RawHandler.pm
Criterion Covered Total %
statement 4 6 66.6
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 6 8 75.0


line stmt bran cond sub pod time code
1             package UAV::Pilot::Video::Mock::RawHandler;
2 1     1   3000 use v5.14;
  1         5  
  1         41  
3 1     1   445 use Moose;
  0            
  0            
4             use namespace::autoclean;
5              
6             with 'UAV::Pilot::Video::RawHandler';
7              
8             has 'cb' => (
9             is => 'ro',
10             isa => 'CodeRef',
11             );
12              
13              
14             sub process_raw_frame
15             {
16             my ($self, @args) = @_;
17             return $self->cb->( $self, @args );
18             }
19              
20              
21             no Moose;
22             __PACKAGE__->meta->make_immutable;
23             1;
24             __END__
25