diff options
-rw-r--r-- | lib/AdminPanel/Shared/Users.pm | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/lib/AdminPanel/Shared/Users.pm b/lib/AdminPanel/Shared/Users.pm index ea2d0fdb..74ad553b 100644 --- a/lib/AdminPanel/Shared/Users.pm +++ b/lib/AdminPanel/Shared/Users.pm @@ -471,6 +471,48 @@ sub updateOrDelUserInGroup { #============================================================= +=head2 getGoups + +=head3 OUTPUT + + $groups: ARRAY reference containing all the groups + +=head3 DESCRIPTION + + This method return the configured groups + +=cut + +#============================================================= +sub getGoups { + my $self = shelf; + + return $self->GroupsEnumerate; +} + +#============================================================= + +=head2 getUsers + +=head3 OUTPUT + + $users: ARRAY reference containing all the users + +=head3 DESCRIPTION + + This method return the configured users + +=cut + +#============================================================= +sub getUsers { + my $self = shelf; + + return $self->ctx->UsersEnumerate; +} + +#============================================================= + =head2 groupNameExists =head3 INPUT |