debug => 1,
}
);
-my $itemnumber = $query->param('item');
-my $borrowernumber = $query->param("borrowernumber");
+my @items = $query->param('item');
+my $borrowernumber = $query->param('borrowernumber') || $query->param('bornum');
+my $opacrenew = C4::Context->preference("OpacRenewalAllowed");
-my $status = CanBookBeRenewed( $borrowernumber, $itemnumber );
-if ( $status == 1 ) {
- AddRenewal( $borrowernumber, $itemnumber );
+for my $itemnumber ( @items ) {
+ my ($status,$error) = CanBookBeRenewed( $borrowernumber, $itemnumber );
+ if ( $status == 1 && $opacrenew == 1 ) {
+ AddRenewal( $borrowernumber, $itemnumber );
+ }
}
+# FIXME: else return ERROR to user!!
if ( $query->param('from') eq 'opac_user' ) {
print $query->redirect("/cgi-bin/koha/opac-user.pl");
-}
+}
+# FIXME: ELSE WHAT? No response at all. Not very robust.