Fixing hierarchy processing

[koha.git] / circ / overdue.pl

diff --git a/circ/overdue.pl b/circ/overdue.pl
index f0dd28e..2bd2302 100755 (executable)
--- a/circ/overdue.pl
+++ b/circ/overdue.pl
@@ -93,8 +93,8 @@ $template->param(
     showall      => $showall,
     csv_param_string => $input->query_string(),
     DHTMLcalendar_dateformat => C4::Dates->DHTMLcalendar(),
-    dateduefrom => $input->param( 'dateduefrom' ),
-    datedueto => $input->param( 'datedueto' ),
+    dateduefrom => $input->param( 'dateduefrom' ) || '',
+    datedueto   => $input->param( 'datedueto' ) || '',
 );
 
 my @sort_roots = qw(borrower title barcode date_due);
@@ -176,7 +176,7 @@ sub build_csv {
     foreach my $overdue ( @{ $overdues } ) {
         my $issues;
         foreach my $issue ( @{$overdue->{overdues} }){
-            $issues .= "$issue->{title} / $issue->{author} / $issue->{itemcallnumber} / $issue->{barcode} / ".format_date($issue->{issuedate}). " - " . format_date($issue->{date_due}) . " \r\n";
+            $issues .= "$issue->{title} / $issue->{author} / $issue->{itemcallnumber} / $issue->{barcode} / ".$issue->{issuedate}. " - " . $issue->{date_due} . " \r\n";
         }
         push @lines, $csv->string() if $csv->combine(
             $overdue->{borrowernumber},