diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2016-08-08 10:50:01 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2016-08-08 10:50:01 +0100 |
| commit | 920a758bbead7d5d3709e459466d9ea34fe157ef (patch) | |
| tree | 5325c4a1a46817df3803a519fb6fb8e8c74af8fa /perllib/FixMyStreet/App/Controller/Admin.pm | |
| parent | b214f99c41c5e57993f521117122453665794173 (diff) | |
Fix other "keys on reference" warning.
This is a continuation of b45b29c8.
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Admin.pm')
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Admin.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Admin.pm b/perllib/FixMyStreet/App/Controller/Admin.pm index 44a653d62..ea8633db0 100644 --- a/perllib/FixMyStreet/App/Controller/Admin.pm +++ b/perllib/FixMyStreet/App/Controller/Admin.pm @@ -411,7 +411,7 @@ sub update_contacts : Private { $c->forward('/auth/check_csrf_token'); my $params = $c->forward( 'body_params' ); - unless ( keys $c->stash->{body_errors} ) { + unless ( keys %{$c->stash->{body_errors}} ) { $c->stash->{body}->update( $params ); my @current = $c->stash->{body}->body_areas->all; my %current = map { $_->area_id => 1 } @current; |