tyler.durden
/
pandorafms
mirror of https://github.com/pandorafms/pandorafms.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix recursion while searching group children perl

This commit is contained in:
fbsanchez 2020-07-07 17:19:02 +02:00
parent fdc1d84089
commit 1944b644a1
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
pandora_server/lib/PandoraFMS/DB.pm
View File

@ -303,10 +303,11 @@ sub get_group_children ($$$;$) {
if (is_empty($href_groups)) {
my @groups = get_db_rows($dbh, 'SELECT * FROM tgrupo');
my $href_groups = map {
my %groups = map {
$_->{'id_grupo'} => $_
} @groups
} @groups;
$href_groups = \%groups;
}
my $return = {};