- unless ( _is_valid_user($username, $password) ) {
- warn "failed auth $username from ". $r->connection->remote_ip. "\n";
- return undef;
- }
-
- warn "authenticated $username from ". $r->connection->remote_ip. "\n";
- adminsuidsetup($username);
-
- FS::CurrentUser->new_session;