From 69fce5574e217a027e31678fdbd21c00ea3ae6cc Mon Sep 17 00:00:00 2001
From: Lucas Gass <lucas@bywatersolutions.com>
Date: Fri, 13 Dec 2024 15:52:34 +0000
Subject: [PATCH] Bug 38452: Use lc() for case insensitivity

---
 tools/inventory.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/inventory.pl b/tools/inventory.pl
index 1c94183596..c2efdb7b01 100755
--- a/tools/inventory.pl
+++ b/tools/inventory.pl
@@ -218,7 +218,7 @@ if ( $op eq 'cud-inventory'
     my @items = Koha::Items->search( { barcode => { -in => \@barcodes } } )->as_list;
     my %items = map { $_->barcode => $_ } @items;
     foreach my $barcode (@barcodes) {
-        my $item = $items{ $barcode };
+        my $item = $items{ lc($barcode) };
         if ( $item ) {
             if ( $item->withdrawn ) {
                 push @errorloop, { 'barcode' => $barcode, 'ERR_WTHDRAWN' => 1 };
-- 
2.39.2