From fc4ad534d09e3f638f015413519134148d011769 Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Wed, 2 Jan 2008 13:18:47 -0600 Subject: [PATCH] opac-detail.pl - cleanup incl. exit after redirect Signed-off-by: Chris Cormack Signed-off-by: Joshua Ferraro --- opac/opac-detail.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl index 92628bef16..bb4f146cd0 100755 --- a/opac/opac-detail.pl +++ b/opac/opac-detail.pl @@ -53,6 +53,7 @@ my $dat = &GetBiblioData($biblionumber); if (!$dat) { print $query->redirect("/cgi-bin/koha/koha-tmpl/errors/404.pl"); + exit; } #coping with subscriptions @@ -84,7 +85,7 @@ my $norequests = 1; foreach my $itm (@items) { $norequests = 0 && $norequests if ( (not $itm->{'wthdrawn'} ) - || (not $itm->{'itemlost'} ) + || (not $itm->{'itemlost'} ) || (not $itm->{'itemnotforloan'} ) || ($itm->{'itemnumber'} ) ); $itm->{ $itm->{'publictype'} } = 1; @@ -113,7 +114,6 @@ $template->param( norequests => $norequests, RequestOnOpac=>$RequestOnOpac ); MARCURLS => $marcurlsarray, ); -my @results = ( $dat, ); foreach ( keys %{$dat} ) { $template->param( "$_" => $dat->{$_} . "" ); } -- 2.39.5