use strict;
use warnings;

use Test::More tests => 4;

use HTML::FormFu;

my $form = HTML::FormFu->new;

# add config-callback to replicate Catalyst-Controller-HTML-FormFu
$form->config_callback(
    {   plain_value => sub {
            return if !defined $_;
            s{__uri_for()\((.+?)\)__}
         {$1}g;
        },
    } );

$form->load_config_file('t/filters/regex.yml');

{
    $form->process( { foo => '   4.5 ', } );

    ok( $form->submitted_and_valid );

    is( $form->param_value('foo'), '4.5' );
}

{

    # clone form

    my $form = $form->clone;

    $form->process( { foo => " abc\t", } );

    ok( $form->submitted_and_valid );

    is( $form->param_value('foo'), 'abc' );
}