Guest User

Untitled

a guest
Jul 18th, 2018
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.66 KB | None | 0 0
  1. use Test::More;
  2. use FindBin;
  3. use lib "$FindBin::bin/../lib";
  4. use Form::Sensible::Form;
  5. use Form::Sensible::Field::Text;
  6. use Form::Sensible::Renderer::TestDump;
  7.  
  8. my $form = Form::Sensible::Form->new(name=>'test');
  9. my $textarea = Form::Sensible::Field::Text->new(name=>'test_field', validation => { regex => qr/^[0-9a-z]*$/ });
  10. $form->add_field($textarea);
  11. my $dumper = Form::Sensible::Renderer::TestDump->new(form=>$form);
  12. my %validation = $dumper->build_hoh;
  13. is_deeply({}, %validation);
  14. done_testing();
  15.  
  16. ## error:
  17. Can't call method "field_validators" on an undefined value at /Users/dhoss/web-devel/Form-Sensible/lib/Form/Sensible/Renderer/TestDump.pm line 22.
Add Comment
Please, Sign In to add comment