From 55d4047189ac7d66db67248ba0cf069345385390 Mon Sep 17 00:00:00 2001 From: Mark Tompsett Date: Sat, 29 Jul 2017 11:27:34 -0400 Subject: [PATCH] [SIGNED-OFF] Bug 14385: Tweak borrower category code $borrower->{categorycode} on a Koha::Patron is not the same as $borrower->categorycode. Fixed error. Signed-off-by: Mark Tompsett Signed-off-by: Aleisha Amohia --- opac/opac-ISBDdetail.pl | 4 ++-- opac/opac-MARCdetail.pl | 4 ++-- opac/opac-detail.pl | 4 ++-- opac/opac-search.pl | 6 +++--- 4 files changed, 9 insertions(+), 9 deletions(-) diff --git a/opac/opac-ISBDdetail.pl b/opac/opac-ISBDdetail.pl index fdb82f5..68aeca1 100755 --- a/opac/opac-ISBDdetail.pl +++ b/opac/opac-ISBDdetail.pl @@ -93,8 +93,8 @@ if (scalar @items >= 1) { if ( C4::Context->preference('OpacHiddenItemsExceptions') ) { # we need to fetch the borrower info here, so we can pass the category - my $borrower = GetMember( borrowernumber => $borrowernumber ); - $borcat = $borrower->{categorycode}; + my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } ); + $borcat = $borrower->categorycode; } my @hiddenitems = GetHiddenItemnumbers( { items => \@items, borcat => $borcat }); diff --git a/opac/opac-MARCdetail.pl b/opac/opac-MARCdetail.pl index 39a4dbf..0fe2b06 100755 --- a/opac/opac-MARCdetail.pl +++ b/opac/opac-MARCdetail.pl @@ -90,8 +90,8 @@ if (scalar @all_items >= 1) { if ( C4::Context->preference('OpacHiddenItemsExceptions') ) { # we need to fetch the borrower info here, so we can pass the category - my $borrower = GetMember( borrowernumber => $borrowernumber ); - $borcat = $borrower->{categorycode}; + my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } ); + $borcat = $borrower->categorycode; } push @items2hide, GetHiddenItemnumbers({ items => \@all_items, borcat => $borcat }); diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl index 66649b4..fa9e2b4 100755 --- a/opac/opac-detail.pl +++ b/opac/opac-detail.pl @@ -86,8 +86,8 @@ if ( scalar @all_items >= 1 ) { if ( C4::Context->preference('OpacHiddenItemsExceptions') ) { # we need to fetch the borrower info here, so we can pass the category - my $borrower = GetMember( borrowernumber => $borrowernumber ); - $borcat = $borrower->{categorycode}; + my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } ); + $borcat = $borrower->categorycode; } push @hiddenitems, diff --git a/opac/opac-search.pl b/opac/opac-search.pl index 6865a47..081c9e5 100755 --- a/opac/opac-search.pl +++ b/opac/opac-search.pl @@ -51,8 +51,8 @@ use C4::Koha; use C4::Tags qw(get_tags); use C4::SocialData; use C4::External::OverDrive; -use C4::Members qw(GetMember); +use Koha::Libraries; use Koha::ItemTypes; use Koha::LibraryCategories; use Koha::Ratings; @@ -632,8 +632,8 @@ my $search_context = {}; $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 = GetMember( borrowernumber => $borrowernumber ); - $search_context->{'category'} = $borrower->{'categorycode'}; + my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } ); + $search_context->{'category'} = $borrower->categorycode; } for (my $i=0;$i<@servers;$i++) { -- 2.1.4