Update tests for modified code, and for CSRF checks.

This commit is contained in:
Colin Kuskie 2009-07-16 22:35:49 +00:00
parent 754fe6a800
commit 8dcd511a8b
7 changed files with 36 additions and 18 deletions

View file

@ -173,7 +173,7 @@ my @forms = HTML::Form->parse($html, 'http://www.webgui.org');
is (scalar @forms, 1, 'getEditForm generates just 1 form');
my @inputs = $forms[0]->inputs;
is (scalar @inputs, 13, 'getEditForm: the form has 13 controls');
is (scalar @inputs, 14, 'getEditForm: the form has 14 controls');
my @interestingFeatures;
foreach my $input (@inputs) {
@ -185,6 +185,10 @@ foreach my $input (@inputs) {
cmp_deeply(
\@interestingFeatures,
[
{
name => 'webguiCsrfToken',
type => 'hidden',
},
{
name => undef,
type => 'submit',