diff options
author | Struan Donald <struan@exo.org.uk> | 2012-10-26 21:57:06 +0100 |
---|---|---|
committer | Struan Donald <struan@exo.org.uk> | 2012-10-26 21:57:06 +0100 |
commit | 15d7a8e2b24d0aafcf2b931c84b2e44688515337 (patch) | |
tree | a7d27537e904c6258f4539b582748be0385abe92 /perllib/FixMyStreet/TestMech.pm | |
parent | 758245a59cfa626df3551cd12d29480d0c7ce053 (diff) |
disabled fields confuse things so ignore them
Diffstat (limited to 'perllib/FixMyStreet/TestMech.pm')
-rw-r--r-- | perllib/FixMyStreet/TestMech.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/TestMech.pm b/perllib/FixMyStreet/TestMech.pm index 5866ee21c..7f81c0fc2 100644 --- a/perllib/FixMyStreet/TestMech.pm +++ b/perllib/FixMyStreet/TestMech.pm @@ -460,6 +460,7 @@ sub visible_form_values { grep { ref($_) ne 'HTML::Form::SubmitInput' } grep { ref($_) ne 'HTML::Form::ImageInput' } grep { ref($_) ne 'HTML::Form::TextInput' || $_->type ne 'hidden' } + grep { !$_->disabled } $form->inputs; my @visible_field_names = map { $_->name } @visible_fields; |