#371 usernames are case insensitive but case preserving

lib/App/Netdisco/Web/Auth/Provider/DBIC.pm

@@ -36,7 +36,7 @@ sub get_user_details {
 
     my $user = try {
       $database->resultset($users_table)->find({
-          $username_column => $username
+          $username_column => { -ilike => $username },
       });
     };
 

lib/App/Netdisco/Web/AuthN.pm

@@ -58,9 +58,9 @@ post '/login' => sub {
 
     if ($success) {
         my $user = schema('netdisco')->resultset('User')
-          ->find( param('username') );
+          ->find({ username => { -ilike => param('username') } });
 
-        session logged_in_user => param('username');
+        session logged_in_user => $user->username;
         session logged_in_fullname => $user->fullname;
         session logged_in_user_realm => $realm;