/t/lib/Field/MyField.pm
Perl | 11 lines | 8 code | 3 blank | 0 comment | 0 complexity | 02d0ffc6b707f7cf41cf75ffdb9d0a4c MD5 | raw file
1package Field::MyField; 2 3use HTML::FormHandler::Moose; 4extends 'HTML::FormHandler::Field::Text'; 5 6has '+widget' => ( default => 'password' ); 7has '+min_length' => ( default => 6 ); 8 9__PACKAGE__->meta->make_immutable; 10no Moose; 111;