Lines 114-120
my $issuer = Koha::Patrons->find($issuerid)->unblessed;
Link Here
|
114 |
|
114 |
|
115 |
my $patronid = $jwt ? Koha::Token->new->decode_jwt( { token => $jwt } ) : undef; |
115 |
my $patronid = $jwt ? Koha::Token->new->decode_jwt( { token => $jwt } ) : undef; |
116 |
unless ($patronid) { |
116 |
unless ($patronid) { |
117 |
if ( C4::Context->preference('SelfCheckoutByLogin') ) { |
117 |
if ( C4::Context->preference('SelfCheckoutByLogin') && $op eq "cud-login" ) { |
118 |
( undef, $patronid ) = checkpw( $patronlogin, $patronpw ); |
118 |
( undef, $patronid ) = checkpw( $patronlogin, $patronpw ); |
119 |
} else { # People should not do that unless they know what they are doing! |
119 |
} else { # People should not do that unless they know what they are doing! |
120 |
# SelfCheckAllowByIPRanges MUST be configured |
120 |
# SelfCheckAllowByIPRanges MUST be configured |
121 |
- |
|
|