From 3982313e8d89982f109d4b4c6c1248d1b7d35512 Mon Sep 17 00:00:00 2001 From: Thomas Lamprecht Date: Tue, 23 Jul 2019 09:12:51 +0200 Subject: [PATCH] array_intersect: allow passing list of references for convenience Signed-off-by: Thomas Lamprecht --- src/PVE/Tools.pm | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/PVE/Tools.pm b/src/PVE/Tools.pm index a9addcd..676647e 100644 --- a/src/PVE/Tools.pm +++ b/src/PVE/Tools.pm @@ -1654,6 +1654,10 @@ sub dev_t_minor($) { sub array_intersect { my ($arrays) = @_; + if (!ref($arrays->[0])) { + $arrays = [ grep { ref($_) eq 'ARRAY' } @_ ]; + } + return [] if scalar(@$arrays) == 0; return $arrays->[0] if scalar(@$arrays) == 1; -- 2.39.2