use strict;
use warnings;
use Test::More tests => 1;
use HTML::FormFu;
my $form = HTML::FormFu->new(
{ tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } } );
$form->load_config_file('t-aggregate/elements/checkboxgroup_attributes_escaped.yml');
$form->process;
my $field = $form->get_field('foo');
my $html = qq{<fieldset>
<span>
<span myattr="escape&container">
<input name="foo" type="checkbox" value="1" myattr="escape&attr" />
<label myattr="escape&label">First</label>
</span>
<span>
<input name="foo" type="checkbox" value="2" myattr="noescape&" />
<label>Second</label>
</span>
</span>
</fieldset>};
is( "$field", $html );