File Coverage

blib/lib/HTML/FormFu/Element/Hidden.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package HTML::FormFu::Element::Hidden;
2              
3 40     40   895 use strict;
  40         50  
  40         1809  
4             our $VERSION = '2.05'; # VERSION
5              
6 40     40   146 use Moose;
  40         44  
  40         261  
7              
8             extends 'HTML::FormFu::Element';
9              
10             with 'HTML::FormFu::Role::Element::Input';
11              
12             after BUILD => sub {
13             my $self = shift;
14              
15             $self->field_type('hidden');
16             $self->container_tag(undef);
17              
18             $self->layout( [
19             'field',
20             ] );
21              
22             return;
23             };
24              
25             __PACKAGE__->meta->make_immutable;
26              
27             1;
28              
29             __END__
30              
31             =head1 NAME
32              
33             HTML::FormFu::Element::Hidden - Hidden form field
34              
35             =head1 VERSION
36              
37             version 2.05
38              
39             =head1 SYNOPSIS
40              
41             my $e = $form->element( Hidden => 'foo' );
42              
43             =head1 DESCRIPTION
44              
45             Hidden form field.
46              
47             =head1 METHODS
48              
49             =head1 SEE ALSO
50              
51             Is a sub-class of, and inherits methods from
52             L<HTML::FormFu::Role::Element::Input>,
53             L<HTML::FormFu::Role::Element::Field>,
54             L<HTML::FormFu::Element>
55              
56             L<HTML::FormFu>
57              
58             =head1 AUTHOR
59              
60             Carl Franks, C<cfranks@cpan.org>
61              
62             =head1 LICENSE
63              
64             This library is free software, you can redistribute it and/or modify it under
65             the same terms as Perl itself.
66              
67             =cut