add authorities support to OPAC
This commit is contained in:
parent
70d716c201
commit
96db38cfcc
|
|
@ -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,
|
||||
|
|
|
|||
|
|
@ -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}}){
|
||||
|
|
|
|||
Loading…
Reference in New Issue