diff options
| -rw-r--r-- | perllib/FixMyStreet/App/Controller/Admin.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Admin.pm b/perllib/FixMyStreet/App/Controller/Admin.pm index 1256ae3b7..a397cf78b 100644 --- a/perllib/FixMyStreet/App/Controller/Admin.pm +++ b/perllib/FixMyStreet/App/Controller/Admin.pm @@ -16,6 +16,7 @@ use Text::CSV; use FixMyStreet::SendReport; use FixMyStreet::SMS; +use Utils; =head1 NAME @@ -1656,6 +1657,7 @@ sub user_import : Path('user_import') { $csv->getline($fh); # discard the header while (my $row = $csv->getline($fh)) { my ($name, $email, $from_body, $permissions) = @$row; + $email = lc Utils::trim_text($email); my @permissions = split(/:/, $permissions); my $user = FixMyStreet::DB->resultset("User")->find_or_new({ email => $email, email_verified => 1 }); |