[Koha-cvs] koha/opac opac-authorities-home.pl opac-detail.pl [rel_2_2]

[Joshua Ferraro]

CVSROOT:	/sources/koha
Module name:	koha
Branch: 	rel_2_2
Changes by:	Joshua Ferraro <kados at savannah.gnu.org>	06/03/06 19:44:08

Modified files:
	opac           : opac-authorities-home.pl opac-detail.pl 

Log message:
	add authorities support to OPAC

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/opac/opac-authorities-home.pl.diff?only_with_tag=rel_2_2&tr1=1.1.2.2&tr2=1.1.2.3&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/koha/koha/opac/opac-detail.pl.diff?only_with_tag=rel_2_2&tr1=1.14.2.17&tr2=1.14.2.18&r1=text&r2=text

Patches:
Index: koha/opac/opac-authorities-home.pl
diff -u koha/opac/opac-authorities-home.pl:1.1.2.2 koha/opac/opac-authorities-home.pl:1.1.2.3
--- koha/opac/opac-authorities-home.pl:1.1.2.2	Sat Mar  4 06:55:13 2006
+++ koha/opac/opac-authorities-home.pl	Mon Mar  6 19:44:08 2006
@@ -65,7 +65,7 @@
 	$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 @@
 		$to = (($startfrom+1)*$resultsperpage);
 	}
 	$template->param(result => $results) if $results;
+	$template->param(FIELDS => \@fields);
 	$template->param(
 							startfrom=> $startfrom,
 							displaynext=> $displaynext,
Index: koha/opac/opac-detail.pl
diff -u koha/opac/opac-detail.pl:1.14.2.17 koha/opac/opac-detail.pl:1.14.2.18
--- koha/opac/opac-detail.pl:1.14.2.17	Wed Mar  1 22:33:25 2006
+++ koha/opac/opac-detail.pl	Mon Mar  6 19:44:08 2006
@@ -103,6 +103,8 @@
 	$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}}){