[Koha-cvs] koha/opac opac-detail.pl [dev_week]

[Joshua Ferraro]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         dev_week
Changes by:     Joshua Ferraro <kados>  06/08/29 15:11:45

Modified files:
        opac           : opac-detail.pl 

Log message:
        adding a new amazon.com item: ratings for individual reviews

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-detail.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.14.2.19.2.3&r2=1.14.2.19.2.4

Patches:
Index: opac-detail.pl
===================================================================
RCS file: /sources/koha/koha/opac/opac-detail.pl,v
retrieving revision 1.14.2.19.2.3
retrieving revision 1.14.2.19.2.4
diff -u -b -r1.14.2.19.2.3 -r1.14.2.19.2.4
--- opac-detail.pl      18 Aug 2006 16:14:15 -0000      1.14.2.19.2.3
+++ opac-detail.pl      29 Aug 2006 15:11:45 -0000      1.14.2.19.2.4
@@ -72,6 +72,8 @@
        my $dbh = C4::Context->dbh;
        my $bibid = 
&MARCfind_MARCbibid_from_oldbiblionumber($dbh,$biblionumber);
        my $marcflavour = C4::Context->preference("marcflavour");
+       my $marcurlsarray = &getMARCurls($dbh,$bibid,$marcflavour);
+       $results[0]->{MARCURLS} = $marcurlsarray;
        my $marcnotesarray = &getMARCnotes($dbh,$bibid,$marcflavour);
        $results[0]->{MARCNOTES} = $marcnotesarray;
        my $marcsubjctsarray = &getMARCsubjects($dbh,$bibid,$marcflavour);
@@ -122,7 +124,7 @@
                        $template->param(rating => $product * 20);
                }
                for my $reviews ( @{ $details->{ Reviews }->{ CustomerReview } 
} ) {
-                       push @reviews, +{ Summary => $reviews->{ Summary }, 
Comment => $reviews->{ Comment }, };
+                       push @reviews, +{ Date => $reviews->{ Date }, Rating => 
$reviews->{ Rating }, Summary => $reviews->{ Summary }, Comment => $reviews->{ 
Comment }, };
                }
        }
        $template->param( SIMILAR_PRODUCTS => address@hidden );