From 8a22ae72f0c4002f7cd985ec60935d3ee8fafd2b Mon Sep 17 00:00:00 2001 From: Mark Tompsett Date: Thu, 29 Mar 2018 18:47:25 +0000 Subject: [PATCH] Bug 20499: Fix the Internal Server Error Content-Type: text/plain; charset=utf-8 TEST PLAN --------- See comment #1 Applying the test without the patch: messy. Applyin both patches: smooth. Run koha qa test tools Signed-off-by: Jonathan Druart Signed-off-by: Marcel de Rooy --- C4/Circulation.pm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/C4/Circulation.pm b/C4/Circulation.pm index 67ee4e5..369d4a2 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -669,6 +669,12 @@ sub CanBookBeIssued { my $override_high_holds = $params->{override_high_holds} || 0; my $item = GetItem(undef, $barcode ); + # MANDATORY CHECKS - unless item exists, nothing else matters + unless ( $item->{barcode} ) { + $issuingimpossible{UNKNOWN_BARCODE} = 1; + } + return ( \%issuingimpossible, \%needsconfirmation ) if %issuingimpossible; + my $issue = Koha::Checkouts->find( { itemnumber => $item->{itemnumber} } ); my $biblio = Koha::Biblios->find( $item->{biblionumber} ); my $biblioitem = $biblio->biblioitem; @@ -676,12 +682,6 @@ sub CanBookBeIssued { my $dbh = C4::Context->dbh; my $patron_unblessed = $patron->unblessed; - # MANDATORY CHECKS - unless item exists, nothing else matters - unless ( $item->{barcode} ) { - $issuingimpossible{UNKNOWN_BARCODE} = 1; - } - return ( \%issuingimpossible, \%needsconfirmation ) if %issuingimpossible; - # # DUE DATE is OK ? -- should already have checked. # -- 2.1.4