Commit a9abc60e authored by Clément OUDOT's avatar Clément OUDOT
Browse files

SAML: Force :md namespace prefix

parent 8b883bc1
......@@ -358,6 +358,10 @@ sub toXML {
# Use XML::Simple to Dump Perl Hash in XML format
my $xs = XML::Simple->new( RootName => "md:EntityDescriptor" );
# Force xmlns:md key
$self->{"xmlns:md"} = "urn:oasis:names:tc:SAML:2.0:metadata" unless defined $self->{"xmlns:md"};
# Serialize XML
my $xml = $xs->XMLout($self);
return $xml;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment