From d25bc6363f444605fb50999079fdcf64789a8786 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Marc=20V=C3=A9ron?= Date: Thu, 12 Mar 2015 10:18:50 +0100 Subject: [PATCH] Bug 13813 - Remove C4::Dates from members/readingrec.pl This patch removes depraceted C4::Dates from members/readingrec.pl To test: Apply patch Go to a patron's cirulation history Verify that circulation history behaves as before. --- members/readingrec.pl | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/members/readingrec.pl b/members/readingrec.pl index de2baec..ceb0518 100755 --- a/members/readingrec.pl +++ b/members/readingrec.pl @@ -31,8 +31,6 @@ use C4::Members; use C4::Branch qw(GetBranches); use List::MoreUtils qw/any uniq/; use Koha::DateUtils; - -use C4::Dates qw/format_date/; use C4::Members::Attributes qw(GetBorrowerAttributes); my $input = CGI->new; @@ -80,8 +78,7 @@ foreach my $issue ( @{$issues} ) { # barcode export if ( $op eq 'export_barcodes' ) { - my $today = C4::Dates->new(); - $today = $today->output('iso'); + my $today = output_pref({ DateTime->now(), dateformat => 'iso' }); my @barcodes = map { $_->{barcode} } grep { $_->{returndate} =~ m/^$today/o } @{$issues}; my $borrowercardnumber = -- 1.7.10.4