aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMatthew Somerville <matthew-github@dracos.co.uk>2017-01-17 17:45:50 +0000
committerMatthew Somerville <matthew-github@dracos.co.uk>2017-01-26 15:02:42 +0000
commit047044ee8e1c9c8e79182c3a61808bbaa7ccfc9c (patch)
tree217ce45f8b3b22c7ee3a4f4381db081bcd6ef60a
parent3c10672a588f07eb87fb1c65cb195215487ec19b (diff)
Lowercase email when signing in.
-rw-r--r--perllib/FixMyStreet/App/Controller/Auth.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Auth.pm b/perllib/FixMyStreet/App/Controller/Auth.pm
index 6e8057723..825033f21 100644
--- a/perllib/FixMyStreet/App/Controller/Auth.pm
+++ b/perllib/FixMyStreet/App/Controller/Auth.pm
@@ -70,6 +70,7 @@ sub sign_in : Private {
my ( $self, $c, $email ) = @_;
$email ||= $c->get_param('email') || '';
+ $email = lc $email;
my $password = $c->get_param('password_sign_in') || '';
my $remember_me = $c->get_param('remember_me') || 0;