From e244354a62a6c9668ee6a9cfba5778ce97ffafbf Mon Sep 17 00:00:00 2001 From: Mark Tompsett Date: Sat, 29 Jul 2017 21:39:32 -0400 Subject: [PATCH] Bug 14385: Corrected issues with category code. When a user isn't logged in, $borrower is undef and causes error when determining category code. Added conditional check. --- opac/opac-ISBDdetail.pl | 2 +- opac/opac-MARCdetail.pl | 2 +- opac/opac-detail.pl | 2 +- opac/opac-search.pl | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) diff --git a/opac/opac-ISBDdetail.pl b/opac/opac-ISBDdetail.pl index a0aab72..45e8af0 100755 --- a/opac/opac-ISBDdetail.pl +++ b/opac/opac-ISBDdetail.pl @@ -94,7 +94,7 @@ if (scalar @items >= 1) { # we need to fetch the borrower info here, so we can pass the category my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } ); - $borcat = $borrower->categorycode; + $borcat = $borrower ? $borrower->categorycode : q{}; } my @hiddenitems = GetHiddenItemnumbers( { items => \@items, borcat => $borcat }); diff --git a/opac/opac-MARCdetail.pl b/opac/opac-MARCdetail.pl index 3bbdb82..048cbec 100755 --- a/opac/opac-MARCdetail.pl +++ b/opac/opac-MARCdetail.pl @@ -89,7 +89,7 @@ if (scalar @all_items >= 1) { # we need to fetch the borrower info here, so we can pass the category my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } ); - $borcat = $borrower->categorycode; + $borcat = $borrower ? $borrower->categorycode : q{}; } push @items2hide, GetHiddenItemnumbers({ items => \@all_items, borcat => $borcat }); diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl index 3c49aaf..445bcdf 100755 --- a/opac/opac-detail.pl +++ b/opac/opac-detail.pl @@ -87,7 +87,7 @@ if ( scalar @all_items >= 1 ) { # we need to fetch the borrower info here, so we can pass the category my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } ); - $borcat = $borrower->categorycode; + $borcat = $borrower ? $borrower->categorycode : q{}; } push @hiddenitems, diff --git a/opac/opac-search.pl b/opac/opac-search.pl index b829a2c..3e4c963 100755 --- a/opac/opac-search.pl +++ b/opac/opac-search.pl @@ -633,7 +633,7 @@ $search_context->{'interface'} = 'opac'; if (C4::Context->preference('OpacHiddenItemsExceptions')){ # we need to fetch the borrower info here, so we can pass the category my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } ); - $search_context->{'category'} = $borrower->categorycode; + $search_context->{'category'} = $borrower ? $borrower->categorycode : q{}; } for (my $i=0;$i<@servers;$i++) { -- 2.1.4