From 754c5d03660e005ff418ba50674bcdeca85cb485 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Marc=20V=C3=A9ron?= <veron@veron.ch>
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