File Coverage

blib/lib/HTML/FormFu/OutputProcessor.pm
Criterion Covered Total %
statement 12 15 80.0
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 21 76.1


line stmt bran cond sub pod time code
1 4     4   2365 use strict;
  4         10  
  4         199  
2              
3             package HTML::FormFu::OutputProcessor;
4             $HTML::FormFu::OutputProcessor::VERSION = '2.07';
5             # ABSTRACT: Post-process HTML output
6              
7 4     4   26 use Moose;
  4         9  
  4         29  
8 4     4   27921 use MooseX::Attribute::Chained;
  4         14  
  4         189  
9              
10             with 'HTML::FormFu::Role::HasParent', 'HTML::FormFu::Role::Populate';
11              
12 4     4   27 use HTML::FormFu::ObjectUtil qw( form parent );
  4         8  
  4         641  
13              
14             has type => ( is => 'rw', traits => ['Chained'] );
15              
16             sub clone {
17 0     0 0   my ($self) = @_;
18              
19 0           my %new = %$self;
20              
21 0           return bless \%new, ref $self;
22             }
23              
24             __PACKAGE__->meta->make_immutable;
25              
26             1;
27              
28             __END__
29              
30             =pod
31              
32             =encoding UTF-8
33              
34             =head1 NAME
35              
36             HTML::FormFu::OutputProcessor - Post-process HTML output
37              
38             =head1 VERSION
39              
40             version 2.07
41              
42             =head1 DESCRIPTION
43              
44             Post-process a form or element's HTML.
45              
46             =head1 CORE OUTPUT PROCESSORS
47              
48             =over
49              
50             =item L<HTML::FormFu::OutputProcessor::Indent>
51              
52             =item L<HTML::FormFu::OutputProcessor::StripWhitespace>
53              
54             =back
55              
56             =head1 AUTHOR
57              
58             Carl Franks, C<cfranks@cpan.org>
59              
60             =head1 LICENSE
61              
62             This library is free software, you can redistribute it and/or modify it under
63             the same terms as Perl itself.
64              
65             =head1 AUTHOR
66              
67             Carl Franks <cpan@fireartist.com>
68              
69             =head1 COPYRIGHT AND LICENSE
70              
71             This software is copyright (c) 2018 by Carl Franks.
72              
73             This is free software; you can redistribute it and/or modify it under
74             the same terms as the Perl 5 programming language system itself.
75              
76             =cut