diff options
Diffstat (limited to 'perllib/FixMyStreet/TestMech.pm')
| -rw-r--r-- | perllib/FixMyStreet/TestMech.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perllib/FixMyStreet/TestMech.pm b/perllib/FixMyStreet/TestMech.pm index 04d825da7..3d011d708 100644 --- a/perllib/FixMyStreet/TestMech.pm +++ b/perllib/FixMyStreet/TestMech.pm @@ -256,9 +256,9 @@ Return all the visible form values on the page - ie not the hidden ones. sub visible_form_values { my $mech = shift; - my @forms = $mech->forms; - - # insert form filtering here (eg ignore login form) + my @forms = + grep { ( $_->attr('name') || '' ) ne 'overrides_form' } # ignore overrides + $mech->forms; croak "Found no forms - can't continue..." unless @forms; |