File Coverage

blib/lib/HTML/FormFu/Exception/Inflator.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 2 0.0
total 12 14 85.7


line stmt bran cond sub pod time code
1             package HTML::FormFu::Exception::Inflator;
2              
3 400     400   1508 use strict;
  400         483  
  400         15075  
4             our $VERSION = '2.05'; # VERSION
5              
6 400     400   1354 use Moose;
  400         412  
  400         1662  
7             extends 'HTML::FormFu::Exception::Input';
8              
9             sub stage {
10 6     6 0 31 return 'inflator';
11             }
12              
13             sub inflator {
14 9     9 0 239 return shift->processor(@_);
15             }
16              
17             around render_data_non_recursive => sub {
18             my ( $orig, $self, $args ) = @_;
19              
20             my $render = $self->$orig( {
21             stage => $self->stage,
22             inflator => $self->inflator,
23             $args ? %$args : (),
24             });
25              
26             return $render;
27             };
28              
29             __PACKAGE__->meta->make_immutable;
30              
31             1;