Bug 29394: adjust request.tt

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

diff --git a/opac/opac-renew.pl b/opac/opac-renew.pl
index b1111d0..46a2050 100755 (executable)
--- a/opac/opac-renew.pl
+++ b/opac/opac-renew.pl
@@ -24,22 +24,19 @@
 use Modern::Perl;
 
 use CGI qw ( -utf8 );
-use C4::Circulation;
-use C4::Auth;
+use C4::Circulation qw( CanBookBeRenewed AddRenewal );
+use C4::Auth qw( get_template_and_user );
 use C4::Context;
-use C4::Items;
 use C4::Members;
 use Koha::Items;
 use Koha::Patrons;
-use Date::Calc qw( Today Date_to_Days );
-my $query = new CGI;
+my $query = CGI->new;
 
 my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
        {
         template_name   => "opac-user.tt",
         query           => $query,
         type            => "opac",
-        debug           => 1,
        }
 ); 
 my @items = $query->multi_param('item');
@@ -62,7 +59,7 @@ else {
         my ( $status, $error ) =
           CanBookBeRenewed( $borrowernumber, $itemnumber );
         if ( $status == 1 && $opacrenew == 1 ) {
-            AddRenewal( $borrowernumber, $itemnumber, undef, undef, undef );
+            AddRenewal( $borrowernumber, $itemnumber, undef, undef, undef, undef, 0 );
             push( @renewed, $itemnumber );
         }
         else {