From bcbe99c74dd3ec2aa67484c9576ced43cf746629 Mon Sep 17 00:00:00 2001
From: Guillem Jover <gjover@sipwise.com>
Date: Thu, 7 Nov 2019 19:54:15 +0100
Subject: [PATCH] TT#69200 Fix mapeq() to match correctly according to
 caseinsensitive argument

Change-Id: I747614927df0a1b0b947c95049b9007e11570bd6
---
 lib/NGCP/BulkProcessor/Array.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/NGCP/BulkProcessor/Array.pm b/lib/NGCP/BulkProcessor/Array.pm
index 5fce468..9b7cecd 100644
--- a/lib/NGCP/BulkProcessor/Array.pm
+++ b/lib/NGCP/BulkProcessor/Array.pm
@@ -342,13 +342,13 @@ sub mapeq {
       if ($case_insensitive) {
         for my $key (keys %$map_prt2) {
             last unless exists $cmp{$key};
-            last unless $map_prt1->{$key} eq $map_prt2->{$key};
+            last unless lc($map_prt1->{$key}) eq lc($map_prt2->{$key});
             delete $cmp{$key};
         }
       } else {
         for my $key (keys %$map_prt2) {
             last unless exists $cmp{$key};
-            last unless lc($map_prt1->{$key}) eq lc($map_prt2->{$key});
+            last unless $map_prt1->{$key} eq $map_prt2->{$key};
             delete $cmp{$key};
         }
       }