File Coverage

blib/lib/Test2/Event/Warning.pm
Criterion Covered Total %
statement 14 14 100.0
branch 1 2 50.0
condition n/a
subroutine 6 6 100.0
pod 1 2 50.0
total 22 24 91.6


line stmt bran cond sub pod time code
1             package Test2::Event::Warning;
2              
3 6     6   39 use strict;
  6         13  
  6         293  
4 6     6   75 use warnings;
  6         14  
  6         452  
5              
6             our $VERSION = '0.10';
7              
8 6     6   2373 use parent 'Test2::Event';
  6         1682  
  6         46  
9              
10 6     6   585 use Test2::Util::HashBase qw( warning );
  6         15  
  6         67  
11              
12             sub init {
13 3 50   3 0 311 $_[0]->{ +WARNING } = 'undef' unless defined $_[0]->{ +WARNING };
14             }
15              
16             sub facet_data {
17             return {
18             assert => {
19             pass => 0,
20 12     12 1 38590 details => $_[0]->{ +WARNING },
21             },
22             };
23             }
24              
25             1;
26              
27             # ABSTRACT: A Test2 event for warnings
28              
29             __END__