diff --git a/lib/LDV/User.pm b/lib/LDV/User.pm index f7a46e8..1242f4f 100644 --- a/lib/LDV/User.pm +++ b/lib/LDV/User.pm @@ -37,6 +37,18 @@ sub logout { $self->rendered(); } +sub auth { + my ($self) = @_; + my $user = $self->req->param('username'); + my $pass = $self->req->param('password'); + + if (my $delay = $self->app->config->{ldap}->{auth_delay}) { + sleep $delay; + } + + $self->redirect_to('/user/login'); +} + sub update { my ($self) = @_; my ($data, $login);