diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2020-07-31 10:56:12 +0100 |
|---|---|---|
| committer | M Somerville <matthew-github@dracos.co.uk> | 2020-08-03 12:35:03 +0100 |
| commit | 2e761c6825d76944fd579c98cd0a222d420ea02d (patch) | |
| tree | 7ab1f431f08e668937d7b4acaee1a48e6d60960d | |
| parent | 7b712ed5a9e78158dbc2b43f5df4ff8fc05ed37c (diff) | |
Lowercase contact email when looking for user.
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Contact.pm | 2 | ||||
| -rw-r--r-- | t/app/controller/contact.t | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Contact.pm b/perllib/FixMyStreet/App/Controller/Contact.pm index 9ce89a9e2..f919cbeff 100644 --- a/perllib/FixMyStreet/App/Controller/Contact.pm +++ b/perllib/FixMyStreet/App/Controller/Contact.pm @@ -199,7 +199,7 @@ sub prepare_params_for_email : Private { my $base_url = $c->cobrand->base_url(); my $admin_url = $c->cobrand->admin_base_url; - my $user = $c->cobrand->users->find( { email => $c->stash->{em} } ); + my $user = $c->cobrand->users->find( { email => lc $c->stash->{em} } ); if ( $user ) { $c->stash->{user_admin_url} = $admin_url . '/users/' . $user->id; $c->stash->{user_reports_admin_url} = $admin_url . '/reports?search=' . $user->email; diff --git a/t/app/controller/contact.t b/t/app/controller/contact.t index d6e56e7cc..01e8b0886 100644 --- a/t/app/controller/contact.t +++ b/t/app/controller/contact.t @@ -382,7 +382,7 @@ for my $test ( $mech->clear_emails_ok; $mech->get_ok('/contact'); - $test->{fields}{em} = $user->email; + $test->{fields}{em} = ucfirst $user->email; # Check case $mech->submit_form_ok( { with_fields => $test->{fields} } ); my $email = $mech->get_email; |