@@ -, +, @@ checkout --- opac/sco/sco-main.pl | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) --- a/opac/sco/sco-main.pl +++ a/opac/sco/sco-main.pl @@ -114,7 +114,12 @@ if (C4::Context->preference('SelfCheckoutByLogin') && !$patronid) { my $resval; ($resval, $patronid) = checkpw($dbh, $patronlogin, $patronpw); } -my $borrower = Koha::Patrons->find( { cardnumber => $patronid } )->unblessed; + +my $borrower; +if ( $patronid ) { + $borrower = Koha::Patrons->find( { cardnumber => $patronid } ); + $borrower = $borrower->unblessed if $borrower; +} my $currencySymbol = ""; if ( my $active_currency = Koha::Acquisition::Currencies->get_active ) { @@ -131,10 +136,8 @@ if ($op eq "logout") { } elsif ( $op eq "returnbook" && $allowselfcheckreturns ) { my ($doreturn) = AddReturn( $barcode, $branch ); - #warn "returnbook: " . $doreturn; - $borrower = Koha::Patrons->find( { cardnumber => $patronid } )->unblessed; } -elsif ( $op eq "checkout" ) { +elsif ( $borrower and $op eq "checkout" ) { my $impossible = {}; my $needconfirm = {}; ( $impossible, $needconfirm ) = CanBookBeIssued( @@ -250,7 +253,7 @@ elsif ( $op eq "checkout" ) { } } # $op -if ($borrower->{cardnumber}) { +if ($borrower) { # warn "issuer's branchcode: " . $issuer->{branchcode}; # warn "user's branchcode: " . $borrower->{branchcode}; my $borrowername = sprintf "%s %s", ($borrower->{firstname} || ''), ($borrower->{surname} || ''); --