From 959b1be1aca6bb415ba4821daaa1fd123ec030c4 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Marc=20V=C3=A9ron?= Date: Thu, 12 Mar 2015 12:39:52 +0100 Subject: [PATCH] Bug 13813 - Remove C4::Dates from overdue_notices.pl This patch removes depraceted C4::Dates from misc/cronjobs/overdue_notices.pl To test: Apply patch Run misc/cronjobs/overdue_notices.pl Verify that dates appear in notices as before (following syspref 'dateformat') --- misc/cronjobs/overdue_notices.pl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/misc/cronjobs/overdue_notices.pl b/misc/cronjobs/overdue_notices.pl index 8db858d..154b7fa 100755 --- a/misc/cronjobs/overdue_notices.pl +++ b/misc/cronjobs/overdue_notices.pl @@ -36,7 +36,6 @@ use Locale::Currency::Format 1.28; use Encode; use C4::Context; -use C4::Dates qw/format_date/; use C4::Debug; use C4::Letters; use C4::Overdues qw(GetFine GetOverdueMessageTransportTypes); @@ -838,7 +837,7 @@ sub parse_letter { } my $substitute = $params->{'substitute'} || {}; - $substitute->{today} ||= C4::Dates->new()->output("syspref"); + $substitute->{today} ||= output_pref({ dt=>DateTime->now(), dateonly=>1 });; my %tables = ( 'borrowers' => $params->{'borrowernumber'} ); if ( my $p = $params->{'branchcode'} ) { -- 1.7.10.4