From cc39cb7fa5c68e5cce6e05b3a21b6e6c29a29a42 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Marc=20V=C3=A9ron?= Date: Sun, 15 Mar 2015 10:09:03 +0100 Subject: [PATCH] Bug 13813 - Remove C4::Dates from circ/bookcount.pl To test: Apply patch Search a biblio with items that are or have been checked out Go to "Items" (moredetail.pl) Locate "Total checkouts" of an item and click 'View item's checkout hsitory' Verify date and time in column "Last seen" Signed-off-by: Jonathan Druart --- circ/bookcount.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/circ/bookcount.pl b/circ/bookcount.pl index eeff50e..bce3bea 100755 --- a/circ/bookcount.pl +++ b/circ/bookcount.pl @@ -31,7 +31,7 @@ use C4::Koha; use C4::Auth; use C4::Branch; # GetBranches use C4::Biblio; # GetBiblioItemData -use C4::Dates qw/format_date/; +use Koha::DateUtils; my $input = new CGI; my $itm = $input->param('itm'); @@ -86,7 +86,7 @@ $template->param( biblioitemnumber => $bi, homebranch => $homebranch, holdingbranch => $holdingbranch, - lastdate => $lastdate ? format_date($lastdate) : 0, + lastdate => $lastdate ? output_pref({ dt => dt_from_string( $lastdate ), dateformat => 'iso', dateonly => 1 }) : 0, count => $count, branchloop => $branchloop, ); @@ -177,7 +177,7 @@ sub slashdate { my ($date) = @_; $date or return; return ( - format_date($date), + output_pref({ dt => dt_from_string( $date, 'iso' ), dateonly => 1 }), substr($date,11,5) ); } -- 2.1.0