/lib/HTML/FormHandler/Field/Button.pm
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;