File Coverage

blib/lib/Test2/Event/ProcessFinish.pm
Criterion Covered Total %
statement 18 18 100.0
branch 4 6 66.6
condition n/a
subroutine 6 6 100.0
pod 1 2 50.0
total 29 32 90.6


line stmt bran cond sub pod time code
1             package Test2::Event::ProcessFinish;
2 25     25   446 use strict;
  25         4  
  25         563  
3 25     25   126 use warnings;
  25         25  
  25         1489  
4              
5             our $VERSION = '0.000013';
6              
7 25     25   74 BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
  25         601  
8 25     25   54 use Test2::Util::HashBase qw/file result/;
  25         45  
  25         102  
9              
10             sub init {
11 611     611 0 11162 my $self = shift;
12 611 50       2097 defined $self->{+RESULT} or $self->trace->throw("'result' is a required attribute");
13             }
14              
15             sub summary {
16 601     601 1 932 my $self = shift;
17 601         4937 my $summary = $self->{+FILE} . ' ';
18 601 100       1436 if ($self->{+RESULT}->ran_tests) {
19 563 50       1900 return $summary . ($self->{+RESULT}->passed ? 'passed' : 'failed');
20             }
21             else {
22 38         367 return $summary . 'did not run any tests';
23             }
24             }
25              
26             1;
27              
28             __END__