File Coverage

blib/lib/HTML/FormFu/Element/Submit.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::Submit;
2              
3 31     31   1010 use strict;
  31         37  
  31         1455  
4             our $VERSION = '2.05'; # VERSION
5              
6 31     31   114 use Moose;
  31         38  
  31         197  
7              
8             extends 'HTML::FormFu::Element::Button';
9              
10             after BUILD => sub {
11             my $self = shift;
12              
13             $self->field_type('submit');
14              
15             return;
16             };
17              
18             __PACKAGE__->meta->make_immutable;
19              
20             1;
21              
22             __END__
23              
24             =head1 NAME
25              
26             HTML::FormFu::Element::Submit - Submit button form field
27              
28             =head1 VERSION
29              
30             version 2.05
31              
32             =head1 SYNOPSIS
33              
34             $element = $form->element( Submit => 'foo' );
35              
36             =head1 DESCRIPTION
37              
38             Submit button form field.
39              
40             =head1 METHODS
41              
42             =head1 SEE ALSO
43              
44             Is a sub-class of, and inherits methods from
45             L<HTML::FormFu::Element::Button>,
46             L<HTML::FormFu::Role::Element::Input>,
47             L<HTML::FormFu::Role::Element::Field>,
48             L<HTML::FormFu::Element>
49              
50             L<HTML::FormFu>
51              
52             =head1 AUTHOR
53              
54             Carl Franks, C<cfranks@cpan.org>
55              
56             =head1 LICENSE
57              
58             This library is free software, you can redistribute it and/or modify it under
59             the same terms as Perl itself.
60              
61             =cut