Decode internal perl encoding for SAML attribute (#864)

2016-01-29 17:21:23 +00:00 · 2016-01-29 17:21:23 +00:00 · 7d7e5a6717
commit 7d7e5a6717
parent a001fb1be4
1 changed files with 3 additions and 0 deletions
--- a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/_SAML.pm
+++ b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/_SAML.pm
@ -2889,6 +2889,9 @@ sub createAttributeValue {
    # Value is required
    return unless defined $value;

+    # Decode UTF-8
+    $value = decode( "utf8", $value );
+
    # SAML2 attribute value
    eval { $saml2value = Lasso::Saml2AttributeValue->new(); };
    if ($@) {