From fd7b32e71e1557f57c28508b224d272914f8a714 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Marc=20V=C3=A9ron?= Date: Sun, 8 Nov 2015 20:26:26 +0100 Subject: [PATCH] Bug 14985: (followup) Remove C4::Dates from C4/Overdues.pm Ths patch removes a stray C4::Dates from C4/Overdues.pm - To test got to a patron who has overdues (Home > Circulation > Checkouts > [Patron]) - Print overdues --- C4/Overdues.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/C4/Overdues.pm b/C4/Overdues.pm index 0fc6232..72c0704 100644 --- a/C4/Overdues.pm +++ b/C4/Overdues.pm @@ -33,6 +33,7 @@ use C4::Accounts; use C4::Log; # logaction use C4::Debug; use C4::Budgets qw(GetCurrency); +use Koha::DateUtils; use vars qw($VERSION @ISA @EXPORT); @@ -978,7 +979,7 @@ sub parse_overdues_letter { } my $substitute = $params->{'substitute'} || {}; - $substitute->{today} ||= C4::Dates->new()->output("syspref"); + $substitute->{today} ||= output_pref( { dt => dt_from_string, dateonly => 1} ); my %tables = ( 'borrowers' => $params->{'borrowernumber'} ); if ( my $p = $params->{'branchcode'} ) { -- 1.7.10.4