Lines 911-917
sub checkauth {
Link Here
|
911 |
{ |
911 |
{ |
912 |
my $patron = Koha::Patrons->find( { userid => $userid } ); |
912 |
my $patron = Koha::Patrons->find( { userid => $userid } ); |
913 |
my $auth = Koha::Auth::TwoFactorAuth->new( { patron => $patron } ); |
913 |
my $auth = Koha::Auth::TwoFactorAuth->new( { patron => $patron } ); |
914 |
my $verified = $auth->verify($otp_token); |
914 |
my $verified = $auth->verify($otp_token, 1); |
915 |
$auth->clear; |
915 |
$auth->clear; |
916 |
if ( $verified ) { |
916 |
if ( $verified ) { |
917 |
# The token is correct, the user is fully logged in! |
917 |
# The token is correct, the user is fully logged in! |
918 |
- |
|
|