Parse forgotten subnodes (Closes: #888)

This commit is contained in:
Xavier Guimard 2016-01-14 06:16:18 +00:00
parent d0da5e3ea0
commit 9526e844fd

View File

@ -315,7 +315,8 @@ sub _scanNodes {
$leaf->{data} );
}
else {
hdebug(" $target: no sub value");
hdebug(" $target: looking for subnodes");
$self->_scanNodes($subNodes);
}
}
elsif ( $target =~ /^saml(?:S|ID)PMetaDataXML$/ ) {
@ -340,7 +341,8 @@ sub _scanNodes {
if ( $base =~ /^oidc(?:O|R)PMetaDataNode$/ ) {
hdebug('OIDC');
if ( $target =~ /^oidc(?:O|R)PMetaDataOptions$/ ) {
hdebug(" $target");
hdebug(" $target: looking for subnodes");
$self->_scanNodes($subNodes);
$self->set( $target, $key, $leaf->{title}, $leaf->{data} );
}
elsif ( $target =~ /^oidcOPMetaData(?:JSON|JWKS)$/ ) {
@ -359,6 +361,10 @@ sub _scanNodes {
$self->set( $target, $key, $leaf->{title},
$leaf->{data} );
}
else {
hdebug(" $target: looking for subnodes");
$self->_scanNodes($subNodes);
}
}
else {
push @{ $self->errors },