@@ -, +, @@ param fails misc/export_records.pl --date=`date +%d/%m/%Y` --deleted_barcodes --filename=/tmp/koha.mrc SELECT DISTINCT barcode FROM deleteditems WHERE deleteditems.biblionumber = ? "] at misc/export_records.pl line 189. - Delete an item with barcode - Without patch, run : misc/export_records.pl --date=`date +%d/%m/%Y` --deleted_barcodes --filename=/tmp/koha.mrc - Without patch, run the same command --- misc/export_records.pl | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) --- a/misc/export_records.pl +++ a/misc/export_records.pl @@ -184,14 +184,12 @@ if ( @record_ids and $id_list_file ) { if ($deleted_barcodes) { for my $record_id ( @record_ids ) { - my $q = q| - |; - my $barcode = $dbh->selectall_arrayref(q| ( + my $barcode = $dbh->selectall_arrayref(q| SELECT DISTINCT barcode FROM deleteditems WHERE deleteditems.biblionumber = ? |, { Slice => {} }, $record_id ); - say $_->{barcode} for @$barcode + say $_->{barcode} for @$barcode; } } else { --