Manage unopend groupe nodes (closes: #888)

This commit is contained in:
Xavier Guimard 2016-01-16 07:27:00 +00:00
parent b50e985ee6
commit de2e0823da

View File

@ -636,6 +636,14 @@ sub _scanNodes {
}
}
# Grouped nodes not opened
elsif ( $leaf->{get} and ref $leaf->{get} eq 'ARRAY' ) {
hdebug(" unopened grouped node");
foreach my $subkey ( @{ $leaf->{get} } ) {
$self->set( $subkey, undef );
}
}
# Normal leaf
else {
$self->set( $name, $leaf->{data} );