From b252385dca72a46122c463a9abd908d7b4abbd79 Mon Sep 17 00:00:00 2001 From: Mark Tompsett Date: Tue, 20 Mar 2018 04:03:44 +0000 Subject: [PATCH] Bug 20340: Followup to allow OPAC login to complete The Plugin authenticates correctly, the problem is there is no patron to match with, and so there is nothing to check for authorization and user-details once a login is attempted. This will at least let it fail gracefully. --- opac/opac-user.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/opac/opac-user.pl b/opac/opac-user.pl index ac91d4f..022aa3d 100755 --- a/opac/opac-user.pl +++ b/opac/opac-user.pl @@ -90,12 +90,12 @@ if (!$borrowernumber) { # get borrower information .... my $patron = Koha::Patrons->find( $borrowernumber ); -my $borr = $patron->unblessed; +my $borr = $patron ? $patron->unblessed : {}; my ( $today_year, $today_month, $today_day) = Today(); my ($warning_year, $warning_month, $warning_day) = split /-/, $borr->{'dateexpiry'}; -my $debar = Koha::Patrons->find( $borrowernumber )->is_debarred; +my $debar = $patron ? $patron->is_debarred : undef; my $userdebarred; if ($debar) { @@ -118,7 +118,7 @@ if ( $userdebarred || $borr->{'gonenoaddress'} || $borr->{'lost'} ) { $canrenew = 0; } -my $amountoutstanding = $patron->account->balance; +my $amountoutstanding = $patron ? $patron->account->balance : 0; if ( $amountoutstanding > 5 ) { $borr->{'amountoverfive'} = 1; } -- 2.1.4