merged from upstream master

[koha.git] / opac / opac-renew.pl

diff --git a/opac/opac-renew.pl b/opac/opac-renew.pl
index 195e827..205f48a 100755 (executable)
--- a/opac/opac-renew.pl
+++ b/opac/opac-renew.pl
@@ -4,6 +4,9 @@
 # adapted for use in the hlt opac by finlay@katipo.co.nz 29/11/2002
 #script to renew items from the web
 
+use strict;
+use warnings;
+
 use CGI;
 use C4::Circulation;
 use C4::Auth;
@@ -20,12 +23,15 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
                  debug           => 1,
        }
 ); 
-my $itemnumber     = $query->param('item');
-my $borrowernumber = $query->param('borrowernumber') || $query->param('bornum');
+my @items          = $query->param('item');
+$borrowernumber = $query->param('borrowernumber') || $query->param('bornum');
+my $opacrenew = C4::Context->preference("OpacRenewalAllowed");
 
-my ($status,$error) = 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!!