@@ -, +, @@ --- C4/Circulation.pm | 8 +++++++- svc/renew | 2 ++ 2 files changed, 9 insertions(+), 1 deletion(-) --- a/C4/Circulation.pm +++ a/C4/Circulation.pm @@ -50,6 +50,7 @@ use Koha::DateUtils; use Koha::Calendar; use Koha::Borrower::Debarments; use Koha::Database; +use Koha::Logger; use Carp; use List::MoreUtils qw( uniq ); use Date::Calc qw( @@ -2787,6 +2788,9 @@ sub AddRenewal { my $datedue = shift; my $lastreneweddate = shift || DateTime->now(time_zone => C4::Context->tz)->ymd(); + my $logger = Koha::Logger->get("C4::Circulation::AddRenewal"); + $logger->trace( "PARAMS: " . Dumper( { borrowernumber => $borrowernumber, itemnumber => $itemnumber, branch => $branch, datedue => $datedue, lastreneweddate => $lastreneweddate } ) ); + my $item = GetItem($itemnumber) or return; my $biblio = GetBiblioFromItemNumber($itemnumber) or return; @@ -2892,7 +2896,9 @@ sub AddRenewal { borrowernumber => $borrowernumber, ccode => $item->{'ccode'}} ); - return $datedue; + + $logger->trace("RETURNING $datedue"); + return $datedue; } sub GetRenewCount { --- a/svc/renew +++ a/svc/renew @@ -28,6 +28,8 @@ use C4::Auth qw(check_cookie_auth); use Koha::DateUtils qw(output_pref dt_from_string); +C4::Context->interface('intranet'); + my $input = new CGI; my ( $auth_status, $sessionID ) = --