[html-element-library.git] / t / fillinform.t

#!/usr/bin/perl
use t::lib tests => 1;

my $tree = mktree 't/html/fillinform.html';
isxml \($tree->fillinform({state => 'catatonic'})), 't/html/fillinform.exp', 'fillinform';
Commit	Line	Data
aa016126 MG	1	#!/usr/bin/perl
aa016126 MG	2	use t::lib tests => 1;
674cdd66	3
aa016126 MG	4	my $tree = mktree 't/html/fillinform.html';
aa016126 MG	5	isxml \($tree->fillinform({state => 'catatonic'})), 't/html/fillinform.exp', 'fillinform';