From: Thomas Lamprecht <t.lamprecht@proxmox.com>
Date: Tue, 23 Jul 2019 06:50:11 +0000 (+0200)
Subject: follouwp: maker array_unique private for now
X-Git-Url: https://git.proxmox.com/?p=pve-common.git;a=commitdiff_plain;h=4c28a8bc6954e8783b14b0a01d8a7cb73830754a;ds=sidebyside

follouwp: maker array_unique private for now

Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
---

diff --git a/src/PVE/Tools.pm b/src/PVE/Tools.pm
index c31ebeb..ff01ebd 100644
--- a/src/PVE/Tools.pm
+++ b/src/PVE/Tools.pm
@@ -1657,11 +1657,16 @@ sub array_intersect {
     return [] if @$arrays == 0;
     return $arrays->[0] if @$arrays == 1;
 
+    my $array_unique = sub {
+	my %seen = ();
+	return grep { ! $seen{ $_ }++ } @_;
+    };
+
     my $return_arr;
-    @$return_arr = array_unique(@{$arrays->[0]});
+    @$return_arr = $array_unique->(@{$arrays->[0]});
     for my $i (1 .. $#$arrays) {
 	my %count = ();
-	foreach my $element (@$return_arr, array_unique(@{$arrays->[$i]})) {
+	foreach my $element (@$return_arr, $array_unique->(@{$arrays->[$i]})) {
 	    $count{$element}++;
 	}
 	$return_arr = [];
@@ -1673,9 +1678,5 @@ sub array_intersect {
     return $return_arr;
 }
 
-sub array_unique {
-    my %seen = ();
-    return grep { ! $seen{ $_ }++ } @_;
-}
 
 1;