Signed-off-by: Alwin Antreich <a.antre...@proxmox.com>
---
 PVE/CLI/pveum.pm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/PVE/CLI/pveum.pm b/PVE/CLI/pveum.pm
index 0426cfb..7a4930f 100755
--- a/PVE/CLI/pveum.pm
+++ b/PVE/CLI/pveum.pm
@@ -74,6 +74,18 @@ our $cmddef = {
     groupadd => [ 'PVE::API2::Group', 'create_group', ['groupid'] ],
     groupmod => [ 'PVE::API2::Group', 'update_group', ['groupid'] ],
     groupdel => [ 'PVE::API2::Group', 'delete_group', ['groupid'] ],
+    grouplist => [ 'PVE::API2::Group', 'index', undef, undef, sub {
+           my $grouplist = shift;
+
+           exit 0 if (!scalar(@$grouplist));
+
+           my $format = qq(%15s  %-10s\n);
+           printf($format, qw(GROUP COMMENT));
+
+           foreach my $rec (sort {$a->{groupid} cmp $b->{groupid} } 
@$grouplist) {
+               printf($format, $rec->{groupid}, $rec->{comment});
+           }
+       }],
 
     roleadd => [ 'PVE::API2::Role', 'create_role', ['roleid'] ],
     rolemod => [ 'PVE::API2::Role', 'update_role', ['roleid'] ],
-- 
2.11.0


_______________________________________________
pve-devel mailing list
pve-devel@pve.proxmox.com
https://pve.proxmox.com/cgi-bin/mailman/listinfo/pve-devel

Reply via email to