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

Decode internal perl encoding for SAML attribute (#864)

parent a001fb1b
...@@ -2889,6 +2889,9 @@ sub createAttributeValue { ...@@ -2889,6 +2889,9 @@ sub createAttributeValue {
# Value is required # Value is required
return unless defined $value; return unless defined $value;
# Decode UTF-8
$value = decode( "utf8", $value );
# SAML2 attribute value # SAML2 attribute value
eval { $saml2value = Lasso::Saml2AttributeValue->new(); }; eval { $saml2value = Lasso::Saml2AttributeValue->new(); };
if ($@) { if ($@) {
......
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