X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=circ%2Fbranchoverdues.pl;h=dc89d60292d05da92f35f296a21484f2910591d0;hb=3ad68c640ce2e4946e7871881097d9bb288014e1;hp=5c1dcafea65449278d6219a8e517c547cbc7088f;hpb=92f52dc8509664dc305e386a198428146566dbb3;p=koha.git diff --git a/circ/branchoverdues.pl b/circ/branchoverdues.pl index 5c1dcafea6..dc89d60292 100755 --- a/circ/branchoverdues.pl +++ b/circ/branchoverdues.pl @@ -22,12 +22,12 @@ use C4::Context; use CGI; use C4::Output; use C4::Auth; -use C4::Dates qw/format_date/; use C4::Overdues; # AddNotifyLine use C4::Biblio; use C4::Koha; use C4::Debug; use C4::Branch; +use Data::Dumper; =head1 branchoverdues.pl @@ -97,7 +97,6 @@ elsif ( $input->param('action') eq 'remove' ) { my @overduesloop; my @getoverdues = GetOverduesForBranch( $default, $location ); -use Data::Dumper; $debug and warn "HERE : $default / $location" . Dumper(@getoverdues); # search for location authorised value my ($tag,$subfield) = GetMarcFromKohaField('items.location',''); @@ -114,7 +113,8 @@ foreach my $num (@getoverdues) { if ($record){ $overdueforbranch{'subtitle'} = GetRecordValue('subtitle',$record,'')->[0]->{subfield}; } - $overdueforbranch{'date_due'} = format_date( $num->{'date_due'} ); + my $dt = dt_from_string($num->{date_due}, 'sql'); + $overdueforbranch{'date_due'} = output_pref($dt); $overdueforbranch{'title'} = $num->{'title'}; $overdueforbranch{'description'} = $num->{'description'}; $overdueforbranch{'barcode'} = $num->{'barcode'}; @@ -151,7 +151,6 @@ foreach my $num (@getoverdues) { # initiate the templates for the overdueloop $template->param( overduesloop => \@overduesloop, - show_date => format_date(C4::Dates->today('iso')), location => $location, );