@EXPORT = qw(
&GetRating
- &ModRating
&DelRating
);
}
my $rating_hashref = GetRating( $biblionumber, undef );
my $rating_hashref = GetRating( $biblionumber, $borrowernumber );
-Mod a rating for a bib
- my $rating_hashref = ModRating( $biblionumber, $borrowernumber, $rating_value );
-
Delete a rating for a bib
my $rating_hashref = DelRating( $biblionumber, $borrowernumber );
return \%rating_hash;
}
-=head2 ModRating
-
- my $rating_hashref = ModRating( $biblionumber, $borrowernumber, $rating_value );
-
-Mod a rating for a bib
-
-=cut
-
-sub ModRating {
- my ( $biblionumber, $borrowernumber, $rating_value ) = @_;
-
- my $rating = Koha::Database->new()->schema->resultset('Rating')->find(
- {
- borrowernumber => $borrowernumber,
- biblionumber => $biblionumber
- }
- );
-
- $rating->update( { rating_value => $rating_value } );
-
- return GetRating( $biblionumber, $borrowernumber );
-}
-
=head2 DelRating
my $rating_hashref = DelRating( $biblionumber, $borrowernumber );
}
elsif ( $rating_value ne $rating_old_value ) {
-#### mod
- $rating = ModRating( $biblionumber, $loggedinuser, $rating_value );
+ $rating = Koha::Ratings->find( { biblionumber => $biblionumber, borrowernumber => $loggedinuser })->rating_value($rating_value)->store;
}
my %js_reply = (
my $biblionumber = $query->param('biblionumber');
my $rating_old_value = $query->param('rating_value');
my $rating_value = $query->param('rating');
-my $rating;
# If JS is disabled and a user click on "Rate me" without selecting a rate
unless ( $biblionumber and $rating_value ) {
Koha::Rating->new( { biblionumber => $biblionumber, borrowernumber => $loggedinuser, rating_value => $rating_value, })->store;
}
else {
- $rating = ModRating( $biblionumber, $loggedinuser, $rating_value );
+ Koha::Ratings->find( { biblionumber => $biblionumber, borrowernumber => $loggedinuser })->rating_value($rating_value)->store;
}
print $query->redirect(
"/cgi-bin/koha/opac-detail.pl?biblionumber=$biblionumber");