From 467079a0f11f0c69b769d7d8940a92e2e5f29ed7 Mon Sep 17 00:00:00 2001
From: "renater.salaun" <renater.salaun@047e039d-479c-447e-8a29-aa6bf4a09bab>
Date: Mon, 16 Mar 2015 13:19:00 +0000
Subject: [PATCH] Fix : show duplicate SP contacts only once in wizard

git-svn-id: https://svn.geant.net/GEANT/edugain_testidp_account_manager/trunk@107 047e039d-479c-447e-8a29-aa6bf4a09bab
---
 lib/IdPAccountManager/ServiceProvider.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lib/IdPAccountManager/ServiceProvider.pm b/lib/IdPAccountManager/ServiceProvider.pm
index 6d07563..5c6df0b 100644
--- a/lib/IdPAccountManager/ServiceProvider.pm
+++ b/lib/IdPAccountManager/ServiceProvider.pm
@@ -40,17 +40,17 @@ sub print {
 sub list_contacts_as_array {
     my $self = shift;
     
-    my @contact_list;
+    my %contact_list;
     
     foreach my $contact_email (split /,/, $self->contacts()) {
-        push @contact_list, $contact_email;
+        $contact_list{$contact_email}++;
     }
     
    foreach my $contact_email (split /,/, $Conf::global{'dev_sp_contact'}) {
-        push @contact_list, $contact_email;
+        $contact_list{$contact_email}++;
     } 
     
-    return @contact_list;
+    return keys %contact_list;
 }
 
 ## Check if email address is a known contact (or conf.dev_sp_contact)
-- 
GitLab