From 21cc701e6c2540d37fcff33cc850e0a814b28554 Mon Sep 17 00:00:00 2001
From: Angelo Naselli <anaselli@linux.it>
Date: Sat, 11 Oct 2014 22:46:04 +0200
Subject: added getGroups and getUsers to Shared

---
 lib/AdminPanel/Shared/Users.pm | 42 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)

(limited to 'lib/AdminPanel/Shared')

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
@@ -469,6 +469,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
-- 
cgit v1.2.1