add authorities support to OPAC

This commit is contained in:
kados 2006-03-06 19:44:08 +00:00
parent 70d716c201
commit 96db38cfcc
2 changed files with 4 additions and 1 deletions

View File

@ -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,

View File

@ -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}}){