From 3822b15ff3b03a3b0f3a8afbce6fedd5f6c9a229 Mon Sep 17 00:00:00 2001
From: Guillaume Rousse <guillaume.rousse@renater.fr>
Date: Mon, 4 Feb 2019 11:48:42 +0100
Subject: [PATCH] fix warning for contact without address
---
bin/update-metadata.in | 10 ++++++++--
1 file changed, 8 insertions(+), 2 deletions(-)
diff --git a/bin/update-metadata.in b/bin/update-metadata.in
index a5350a9..2fc80a1 100755
--- a/bin/update-metadata.in
+++ b/bin/update-metadata.in
@@ -116,8 +116,14 @@ foreach my $id (keys %{$configuration->{federations}}) {
information_url => $entry->{information_url},
organization_url => $entry->{organization_url},
);
- $entity->contacts(uniq map { $_->{EmailAddress} } @{$entry->{contacts}})
- if $entry->{contacts};
+ if ($entry->{contacts}) {
+ my @contacts =
+ uniq
+ grep { $_ }
+ map { $_->{EmailAddress} }
+ @{$entry->{contacts}};
+ $entity->contacts(@contacts);
+ }
$entity->federations($id);
$entity->save();
}
--
GitLab