dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix #1207

Browse Source
This commit is contained in:
Xavier Guimard 2017-04-07 10:28:55 +00:00
parent 2c1be99419
commit c1bb34ab11
1 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lemonldap-ng-common/lib/Lemonldap/NG/Common/Conf/RESTServer.pm
View File

@ -716,14 +716,13 @@ sub getKey {
}
elsif ( $key =~ qr/^$doubleHashKeys$/o ) {
my @res;
if ( defined $value ) {
foreach my $host ( sort keys %$value ) {
my @tmp;
foreach my $k ( sort keys %{ $value->{$host} } ) {
push @tmp, { k => $k, v => $value->{$host}->{$k} };
}
push @res, { k => $host, h => \@tmp };
$value ||= {};
foreach my $host ( sort keys %$value ) {
my @tmp;
foreach my $k ( sort keys %{ $value->{$host} } ) {
push @tmp, { k => $k, v => $value->{$host}->{$k} };
}
push @res, { k => $host, h => \@tmp };
}
return $self->sendJSONresponse( $req, { value => \@res } );
}