From 96db38cfccc38135e89ca4672cc5b47072b38e4d Mon Sep 17 00:00:00 2001 From: kados Date: Mon, 6 Mar 2006 19:44:08 +0000 Subject: [PATCH] add authorities support to OPAC --- opac/opac-authorities-home.pl | 3 ++- opac/opac-detail.pl | 2 ++ 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/opac/opac-authorities-home.pl b/opac/opac-authorities-home.pl index f46452cee2..b5f9967e4c 100755 --- a/opac/opac-authorities-home.pl +++ b/opac/opac-authorities-home.pl @@ -65,7 +65,7 @@ if ($op eq "do_search") { $resultsperpage= $query->param('resultsperpage'); $resultsperpage = 19 if(!defined $resultsperpage); my @tags; - my ($results,$total) = authoritysearch($dbh, \@marclist,\@and_or, + my ($results,$total, @fields) = authoritysearch($dbh, \@marclist,\@and_or, \@excluding, \@operator, \@value, $startfrom*$resultsperpage, $resultsperpage,$authtypecode); ($template, $loggedinuser, $cookie) @@ -124,6 +124,7 @@ if ($op eq "do_search") { $to = (($startfrom+1)*$resultsperpage); } $template->param(result => $results) if $results; + $template->param(FIELDS => \@fields); $template->param( startfrom=> $startfrom, displaynext=> $displaynext, diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl index fa8b7b033f..4a60cd797d 100755 --- a/opac/opac-detail.pl +++ b/opac/opac-detail.pl @@ -103,6 +103,8 @@ if (C4::Context->preference("AmazonContent")==1) { $dat->{'amazonisbn'}=$dat->{'isbn'}; $dat->{'amazonisbn'} =~ s|-||g; + $template->param( amazonisbn => $dat->{amazonisbn} ); + my $amazon_details = &get_amazon_details($dat->{amazonisbn}); foreach my $result (@{$amazon_details->{Details}}){ -- 2.39.5