Merge pull request #658 from Johaney-s/ad_group_mu_ucn

fix(ad_group_mu_ucn): use Base64 in ldif description
CESNET · Jan 13, 2022 · db46074 · db46074
2 parents 8857065 + 8679115
commit db46074
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/gen/ad_group_mu_ucn b/gen/ad_group_mu_ucn
@@ -5,6 +5,8 @@ use strict;
 use warnings;
 use perunServicesInit;
 use perunServicesUtils;
+use MIME::Base64;
+use Encode;
 no if $] >= 5.017011, warnings => 'experimental::smartmatch';
 
 local $::SERVICE_NAME = "ad_group_mu_ucn";
@@ -101,7 +103,7 @@ for my $group (sort keys %$groups) {
 	print FILE "dn: CN=" . $group . "," . $groups->{$group}->{$A_R_ADOUNAME} . "\n";
 	print FILE "cn: " . $group . "\n";
 	print FILE "samAccountName: " . $group . "\n";
-	print FILE "description: " . $groups->{$group}->{"description"} . "\n";
+	print FILE "description:: " . encode_base64($groups->{$group}->{"description"}) . "\n";
 	print FILE "info: perun\@muni.cz\n";
 	print FILE "objectClass: group\n";
 	print FILE "objectClass: top\n";