PageRenderTime 29ms CodeModel.GetById 20ms app.highlight 5ms RepoModel.GetById 2ms app.codeStats 0ms

/lib/HTML/FormHandler/Field/Button.pm

http://github.com/gshank/html-formhandler
Perl | 23 lines | 13 code | 9 blank | 1 comment | 0 complexity | 57af583b31b7fe7d1b041dbf2b7d6b0e MD5 | raw file
 1package HTML::FormHandler::Field::Button;
 2# ABSTRACT: button field
 3
 4use Moose;
 5extends 'HTML::FormHandler::Field::NoValue';
 6
 7=head1 SYNOPSIS
 8
 9Use this field to declare a button field in your form.
10
11   has_field 'button' => ( type => 'Button', value => 'Press Me!' );
12
13Uses the 'button' widget.
14
15=cut
16
17has '+widget' => ( default => 'Button' );
18
19has '+value' => ( default => 'Button' );
20
21__PACKAGE__->meta->make_immutable;
22use namespace::autoclean;
231;