View | Details | Raw Unified | Return to bug 14167
Collapse All | Expand All

(-)a/C4/Circulation.pm (-1 / +7 lines)
Lines 50-55 use Koha::DateUtils; Link Here
50
use Koha::Calendar;
50
use Koha::Calendar;
51
use Koha::Borrower::Debarments;
51
use Koha::Borrower::Debarments;
52
use Koha::Database;
52
use Koha::Database;
53
use Koha::Logger;
53
use Carp;
54
use Carp;
54
use List::MoreUtils qw( uniq );
55
use List::MoreUtils qw( uniq );
55
use Date::Calc qw(
56
use Date::Calc qw(
Lines 2792-2797 sub AddRenewal { Link Here
2792
    my $datedue         = shift;
2793
    my $datedue         = shift;
2793
    my $lastreneweddate = shift || DateTime->now(time_zone => C4::Context->tz)->ymd();
2794
    my $lastreneweddate = shift || DateTime->now(time_zone => C4::Context->tz)->ymd();
2794
2795
2796
    my $logger = Koha::Logger->get();
2797
    $logger->trace( "PARAMS: " . Dumper( { borrowernumber => $borrowernumber, itemnumber => $itemnumber, branch => $branch, datedue => $datedue, lastreneweddate => $lastreneweddate } ) );
2798
2795
    my $item   = GetItem($itemnumber) or return;
2799
    my $item   = GetItem($itemnumber) or return;
2796
    my $biblio = GetBiblioFromItemNumber($itemnumber) or return;
2800
    my $biblio = GetBiblioFromItemNumber($itemnumber) or return;
2797
2801
Lines 2897-2903 sub AddRenewal { Link Here
2897
                borrowernumber => $borrowernumber,
2901
                borrowernumber => $borrowernumber,
2898
                ccode => $item->{'ccode'}}
2902
                ccode => $item->{'ccode'}}
2899
                );
2903
                );
2900
	return $datedue;
2904
2905
    $logger->trace("RETURNING $datedue");
2906
    return $datedue;
2901
}
2907
}
2902
2908
2903
sub GetRenewCount {
2909
sub GetRenewCount {
(-)a/svc/renew (-1 / +2 lines)
Lines 28-33 use C4::Auth qw(check_cookie_auth); Link Here
28
28
29
use Koha::DateUtils qw(output_pref dt_from_string);
29
use Koha::DateUtils qw(output_pref dt_from_string);
30
30
31
C4::Context->interface('intranet');
32
31
my $input = new CGI;
33
my $input = new CGI;
32
34
33
my ( $auth_status, $sessionID ) =
35
my ( $auth_status, $sessionID ) =
34
- 

Return to bug 14167