|
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 |
- |
|
|