From c9182fff524626bd8c1c67556d9846218b5bc416 Mon Sep 17 00:00:00 2001 From: "renater.salaun" <renater.salaun@047e039d-479c-447e-8a29-aa6bf4a09bab> Date: Fri, 12 Dec 2014 14:38:09 +0000 Subject: [PATCH] Add news methods before trying inheritance git-svn-id: https://svn.geant.net/GEANT/edugain_testidp_account_manager/trunk@73 047e039d-479c-447e-8a29-aa6bf4a09bab --- lib/IdPAccountManager/ServiceProvider.pm | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/lib/IdPAccountManager/ServiceProvider.pm b/lib/IdPAccountManager/ServiceProvider.pm index b0c7c98..748f627 100644 --- a/lib/IdPAccountManager/ServiceProvider.pm +++ b/lib/IdPAccountManager/ServiceProvider.pm @@ -39,6 +39,13 @@ sub new { return $self; } +sub load { + my $self = shift; + my %args = @_; + + return $self->{'persistent'}->load(%args); +} + sub get { my $self = shift; my $attribute_name = shift; @@ -70,8 +77,8 @@ sub print { my $self = shift; my $fd = shift || \*STDOUT; - printf $fd "ServiceProvider ID=%s; entityid=%s; displayname=%s\n", - $self->get('id'), $self->get('entityid'), $self->get('displayname'); + printf $fd "ServiceProvider ID=%s; entityid=%s; displayname=%s; contacts=%s\n", + $self->get('id'), $self->get('entityid'), $self->get('displayname'), $self->get('contacts'); return 1. } -- GitLab