From 505b84ec6b770cf35333499d656ba9cd9c2e2e12 Mon Sep 17 00:00:00 2001 From: Mark Tompsett Date: Tue, 27 Jun 2017 22:52:21 -0400 Subject: [PATCH] [SIGNED-OFF] Bug 14385: Tweaks so t/db_dependent/00-strict.t passes There was a typo botcat vs borcat and borrowernumber was never defined. Grabbing from userenv, like other code does. Signed-off-by: Mark Tompsett Signed-off-by: Aleisha Amohia --- opac/opac-ISBDdetail.pl | 4 ++++ opac/opac-MARCdetail.pl | 6 +++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/opac/opac-ISBDdetail.pl b/opac/opac-ISBDdetail.pl index 9b5bc3a..fdb82f5 100755 --- a/opac/opac-ISBDdetail.pl +++ b/opac/opac-ISBDdetail.pl @@ -85,7 +85,11 @@ my $marcflavour = C4::Context->preference("marcflavour"); my @items = GetItemsInfo($biblionumber); if (scalar @items >= 1) { + my $borrowernumber; my $borcat; + if (C4::Context->userenv) { + $borrowernumber = C4::Context->userenv->{'number'}; + } if ( C4::Context->preference('OpacHiddenItemsExceptions') ) { # we need to fetch the borrower info here, so we can pass the category diff --git a/opac/opac-MARCdetail.pl b/opac/opac-MARCdetail.pl index 4e40f41..39a4dbf 100755 --- a/opac/opac-MARCdetail.pl +++ b/opac/opac-MARCdetail.pl @@ -82,14 +82,18 @@ if ( ! $record ) { my @all_items = GetItemsInfo($biblionumber); my @items2hide; if (scalar @all_items >= 1) { + my $borrowernumber; my $borcat; + if (C4::Context->userenv) { + $borrowernumber = C4::Context->userenv->{'number'}; + } 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}; } - push @items2hide, GetHiddenItemnumbers({ items => \@all_items, borcat => $botcat }); + push @items2hide, GetHiddenItemnumbers({ items => \@all_items, borcat => $borcat }); if (scalar @items2hide == scalar @all_items ) { print $query->redirect("/cgi-bin/koha/errors/404.pl"); -- 2.1.4