1use strict;
2use warnings;
3
4use Test::More tests => 2;
5
6use HTML::FormFu;
7
8my $form = HTML::FormFu->new(
9    { tt_args => { INCLUDE_PATH => 'share/templates/tt/xhtml' } } );
10
11$form->auto_fieldset(1);
12
13my $block = $form->element(
14    {   type        => 'Src',
15        content_xml => 'Hello <i>World</i>!',
16    } );
17
18my $block_xhtml = qq{
19Hello <i>World</i>!
20};
21
22is( $block, $block_xhtml );
23
24my $form_xhtml = <<EOF;
25<form action="" method="post">
26<fieldset>
27$block_xhtml
28</fieldset>
29</form>
30EOF
31
32is( $form, $form_xhtml );
33
34