git.shiar.nl
/
perl
/
html-form-simple.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
XXX: hidden options
[perl/html-form-simple.git]
/
t
/
html.t
diff --git
a/t/html.t
b/t/html.t
index c646cdb9810cbcb60314445f6cb2d3c8284825f5..e5abb9ac5ac34e2e4550dc4c52e4d590043ff1b6 100644
(file)
--- a/
t/html.t
+++ b/
t/html.t
@@
-5,7
+5,7
@@
use warnings;
use Test::More;
use Test::More;
-plan tests => 5
0
;
+plan tests => 5
1
;
use_ok('HTML::Form::Simple');
use_ok('HTML::Form::Simple');
@@
-52,7
+52,11
@@
is(
'hidden'
);
'hidden'
);
-#TODO: hidden options
+is(
+ $form->hidden(undef, undef, {value => 'bar', name => 'foo', id => 'foo'}),
+ '<input id="foo" name="foo" type="hidden" value="bar">',
+ 'hidden options'
+);
# submit
# submit