proxmox-mirrors/pve-access-control
1
0
Fork 0
mirror of https://git.proxmox.com/git/pve-access-control synced 2025-08-03 16:31:48 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

code cleanup

Browse Source
This commit is contained in:
Dietmar Maurer 2012-01-26 13:35:33 +01:00
parent 399932c682
commit cab28ea50b
1 changed files with 4 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
PVE/API2/Pool.pm
View File

@ -14,22 +14,6 @@ use PVE::RESTHandler;
use base qw(PVE::RESTHandler);
my $extract_pool_data = sub {
my ($data, $full) = @_;
my $res = {};
$res->{comment} = $data->{comment} if defined($data->{comment});
return $res if !$full;
$res->{vms} = $data->{vms} ? [ keys %{$data->{vms}} ] : [];
$res->{storages} = $data->{storage} ? [ keys %{$data->{storage}} ] : [];
return $res;
};
__PACKAGE__->register_method ({
name => 'index',
path => '',
@ -61,9 +45,10 @@ __PACKAGE__->register_method ({
my $usercfg = $rpcenv->{user_cfg};
foreach my $poolpath (keys %{$usercfg->{pools}}) {
my $entry = &$extract_pool_data($usercfg->{pools}->{$poolpath});
$entry->{poolid} = $poolpath;
foreach my $pool (keys %{$usercfg->{pools}}) {
my $entry = { poolid => $pool };
my $data = $usercfg->{pools}->{$pool};
$entry->{comment} = $data->{comment} if defined($data->{comment});
push @$res, $entry;
}