From bbaf529e5fc12e73231c9b99f3ceb30c405d08a2 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Fri, 13 Dec 2019 10:03:20 +0000 Subject: [PATCH] Bug 23800: (QA follow-up) Remove useless line Content-Type: text/plain; charset=utf-8 The lines with my @barcodes makes no sense anymore. Test plan: Test with a barcode file. Signed-off-by: Marcel de Rooy --- tools/batchMod.pl | 1 - 1 file changed, 1 deletion(-) diff --git a/tools/batchMod.pl b/tools/batchMod.pl index 124d6f0b6a..9ed3301471 100755 --- a/tools/batchMod.pl +++ b/tools/batchMod.pl @@ -264,7 +264,6 @@ if ($op eq "show"){ @contentlist = uniq @contentlist; # Note: adding lc for case insensitivity my %itemdata = map { lc($_->{barcode}) => $_->{itemnumber} } @{ Koha::Items->search({ barcode => \@contentlist }, { columns => [ 'itemnumber', 'barcode' ] } )->unblessed }; - my @barcodes = grep { exists $itemdata{lc $_} } @contentlist; @itemnumbers = map { exists $itemdata{lc $_} ? $itemdata{lc $_} : () } @contentlist; @notfoundbarcodes = grep { !exists $itemdata{lc $_} } @contentlist; } -- 2.11.0