@@ -, +, @@ --- members/readingrec.pl | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) --- a/members/readingrec.pl +++ a/members/readingrec.pl @@ -84,7 +84,8 @@ foreach my $issue (@{$issues}){ $line{barcode} = $issue->{'barcode'}; $line{volumeddesc} = $issue->{'volumeddesc'}; push(@loop_reading,\%line); - if (($input->param('op') eq 'export_barcodes') and ($today eq $issue->{'returndate'})) { + if ( ($input->param('op') eq 'export_barcodes') + and ($today eq C4::Dates->new( $issue->{'returndate'}, 'iso' )->output("iso")) ) { push( @barcodes, $issue->{'barcode'} ); } } --