File Coverage

blib/lib/SmokeRunner/Multi/Reporter.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 2 2 100.0
total 24 24 100.0


line stmt bran cond sub pod time code
1             package SmokeRunner::Multi::Reporter;
2             our $AUTHORITY = 'cpan:YANICK';
3             #ABSTRACT: Base class for reporting on smoke tests
4             $SmokeRunner::Multi::Reporter::VERSION = '0.21';
5 3     3   21184 use strict;
  3         7  
  3         76  
6 3     3   13 use warnings;
  3         6  
  3         77  
7              
8 3     3   14 use base 'Class::Accessor::Fast';
  3         6  
  3         1688  
9             __PACKAGE__->mk_ro_accessors( 'runner' );
10              
11 3     3   7699 use SmokeRunner::Multi::Validate qw( validate RUNNER_TYPE TEST_SET_TYPE );
  3         6  
  3         23  
12              
13              
14             {
15             my $spec = { runner => RUNNER_TYPE,
16             };
17              
18             sub new {
19 9     9 1 2174 my $class = shift;
20 9         738 my %p = validate( @_, $spec );
21              
22 8         87 return bless \%p, $class;
23             }
24             }
25              
26             sub report {
27 1     1 1 14 die "The report() method must be overridden in a subclass.\n"
28             }
29              
30              
31             1;
32              
33             __END__