From 919f68ddcd1dc238e56ff1b7b62ad876548ed7af Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?C=C3=B4me=20Chilliet?= <come@opensides.be>
Date: Mon, 16 Jan 2017 09:34:20 +0100
Subject: [PATCH] Use for instead of map to fix sonar warning about modifying
 $_ in map.

---
 contrib/bin/fusiondirectory-setup | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/contrib/bin/fusiondirectory-setup b/contrib/bin/fusiondirectory-setup
index 5a31012eb..3dad1bddb 100644
--- a/contrib/bin/fusiondirectory-setup
+++ b/contrib/bin/fusiondirectory-setup
@@ -1597,7 +1597,7 @@ sub migrate_acls {
     if ($old_formats) {
       @nacls = sort @nacls;
       my $i = 0;
-      map { s/^[0-9]*:/$i:/; $i++ } @nacls; # Re-index acls
+      for (@nacls) { s/^[0-9]*:/$i:/; $i++ }; # Re-index acls
       my $result = $ldap->modify (
         $entry->dn,
         replace => {
-- 
GitLab