[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha koha-tmpl/opac-tmpl/prog/en/opac-detail.tm... [rel_3_0]
|
From: |
paul poulain |
|
Subject: |
[Koha-cvs] koha koha-tmpl/opac-tmpl/prog/en/opac-detail.tm... [rel_3_0] |
|
Date: |
Wed, 31 Jan 2007 16:28:06 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: paul poulain <tipaul> 07/01/31 16:28:06
Modified files:
koha-tmpl/opac-tmpl/prog/en: opac-detail.tmpl
opac-ISBDdetail.tmpl
opac : opac-ISBDdetail.pl
Log message:
synch'ing ISBD & normal view
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.15&r2=1.1.2.16
http://cvs.savannah.gnu.org/viewcvs/koha/koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.8&r2=1.1.2.9
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-ISBDdetail.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.16.2.8&r2=1.16.2.9
Patches:
Index: koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl
===================================================================
RCS file: /sources/koha/koha/koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl,v
retrieving revision 1.1.2.15
retrieving revision 1.1.2.16
diff -u -b -r1.1.2.15 -r1.1.2.16
--- koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl 29 Jan 2007 16:37:44
-0000 1.1.2.15
+++ koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl 31 Jan 2007 16:28:06
-0000 1.1.2.16
@@ -23,9 +23,11 @@
Print
</a>
<!-- TMPL_IF name="virtualshelves" -->
+ <!-- TMPL_IF NAME="loggedinusername" -->
<a href="/cgi-bin/koha/opac-addbookbybiblionumber.pl?biblionumber=<!--
TMPL_VAR NAME="biblionumber" -->"
onclick="Dopop('opac-addbookbybiblionumber.pl?biblionumber=<!-- TMPL_VAR
NAME="biblionumber" -->'); return false;">
Add to My Book List
</a>
+ <!-- /TMPL_IF -->
<!-- /TMPL_IF -->
<a href="#" onclick="addRecord('<!-- TMPL_VAR NAME="biblionumber"
-->'); return false;">
Add to My Book Bag
Index: koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl
===================================================================
RCS file: /sources/koha/koha/koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl,v
retrieving revision 1.1.2.8
retrieving revision 1.1.2.9
diff -u -b -r1.1.2.8 -r1.1.2.9
--- koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl 31 Jan 2007 15:57:55
-0000 1.1.2.8
+++ koha-tmpl/opac-tmpl/prog/en/opac-ISBDdetail.tmpl 31 Jan 2007 16:28:06
-0000 1.1.2.9
@@ -22,10 +22,12 @@
Print
</a>
<!-- TMPL_IF name="virtualshelves" -->
+ <!-- TMPL_IF NAME="loggedinusername" -->
<a href="/cgi-bin/koha/opac-addbookbybiblionumber.pl?biblionumber=<!--
TMPL_VAR NAME="biblionumber" -->"
onclick="Dopop('opac-addbookbybiblionumber.pl?biblionumber=<!-- TMPL_VAR
NAME="biblionumber" -->'); return false;">
Add to My Book List
</a>
<!-- /TMPL_IF -->
+ <!-- /TMPL_IF -->
<a href="#" onclick="addRecord('<!-- TMPL_VAR NAME="biblionumber"
-->'); return false;">
Add to My Book Bag
</a>
Index: opac/opac-ISBDdetail.pl
===================================================================
RCS file: /sources/koha/koha/opac/opac-ISBDdetail.pl,v
retrieving revision 1.16.2.8
retrieving revision 1.16.2.9
diff -u -b -r1.16.2.8 -r1.16.2.9
--- opac/opac-ISBDdetail.pl 10 Jan 2007 10:52:58 -0000 1.16.2.8
+++ opac/opac-ISBDdetail.pl 31 Jan 2007 16:28:06 -0000 1.16.2.9
@@ -17,7 +17,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: opac-ISBDdetail.pl,v 1.16.2.8 2007/01/10 10:52:58 toins Exp $
+# $Id: opac-ISBDdetail.pl,v 1.16.2.9 2007/01/31 16:28:06 tipaul Exp $
=head1 NAME
@@ -53,6 +53,7 @@
use MARC::Record;
use C4::Biblio;
use C4::Acquisition;
+use C4::Review;
use C4::Serials; # uses getsubscriptionfrom biblionumber
use C4::Koha; # use getitemtypeinfo
use C4::Branch; # use GetBranchName
@@ -169,18 +170,65 @@
# remove empty ()
$res =~ s/\(\)//g;
+
+my $reviews = getreviews( $biblionumber, 1 );
+foreach ( @$reviews ) {
+ my $borrower_number_review = $_->{borrowernumber};
+ my $borrowerData = GetMember('',$borrower_number_review);
+ # setting some borrower info into this hash
+ $_->{title} = $borrowerData->{'title'};
+ $_->{surname} = $borrowerData->{'surname'};
+ $_->{firstname} = $borrowerData->{'firstname'};
+}
+
+
$template->param(
ISBD => $res,
- biblionumber => $biblionumber
+ biblionumber => $biblionumber,
+ reviews => $reviews,
);
-# adding the $RequestOnOpac param
-my $RequestOnOpac;
-if (C4::Context->preference("RequestOnOpac")) {
- $RequestOnOpac = 1;
+## Amazon.com stuff
+#not used unless preference set
+if ( C4::Context->preference("AmazonContent") == 1 ) {
+ use C4::Amazon;
+ $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} } ) {
+ $template->param( item_description => $result->{ProductDescription} );
+ $template->param( image => $result->{ImageUrlMedium} );
+ $template->param( list_price => $result->{ListPrice} );
+ $template->param( amazon_url => $result->{url} );
+ }
+
+ my @products;
+ my @reviews;
+ for my $details ( @{ $amazon_details->{Details} } ) {
+ next unless $details->{SimilarProducts};
+ for my $product ( @{ $details->{SimilarProducts}->{Product} } ) {
+ push @products, +{ Product => $product };
+ }
+ next unless $details->{Reviews};
+ for my $product ( @{ $details->{Reviews}->{AvgCustomerRating} } ) {
+ $template->param( rating => $product * 20 );
+ }
+ for my $reviews ( @{ $details->{Reviews}->{CustomerReview} } ) {
+ push @reviews,
+ +{
+ Summary => $reviews->{Summary},
+ Comment => $reviews->{Comment},
+ };
+ }
+ }
+ $template->param( SIMILAR_PRODUCTS => address@hidden );
+ $template->param( AMAZONREVIEWS => address@hidden );
}
-
output_html_with_http_headers $query, $cookie, $template->output;
sub get_authorised_value_desc ($$$$$) {