Signed-off-by: Dietmar Maurer <diet...@proxmox.com> --- src/PVE/CLIHandler.pm | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-)
diff --git a/src/PVE/CLIHandler.pm b/src/PVE/CLIHandler.pm index 1c754e4..9933df7 100644 --- a/src/PVE/CLIHandler.pm +++ b/src/PVE/CLIHandler.pm @@ -540,7 +540,7 @@ sub print_api_list { } sub print_api_result { - my ($format, $data, $result_schema) = @_; + my ($format, $data, $result_schema, $props_to_print) = @_; return if $result_schema->{type} eq 'null'; @@ -549,14 +549,20 @@ sub print_api_result { } elsif ($format eq 'text') { my $type = $result_schema->{type}; if ($type eq 'object') { - foreach my $key (sort keys %$data) { - print $key . ": " . data_to_text($data->{$key}) . "\n"; + if (defined($props_to_print)) { + foreach my $key (@$props_to_print) { + print $key . ": " . data_to_text($data->{$key}) . "\n"; + } + } else { + foreach my $key (sort keys %$data) { + print $key . ": " . data_to_text($data->{$key}) . "\n"; + } } } elsif ($type eq 'array') { return if !scalar(@$data); my $item_type = $result_schema->{items}->{type}; if ($item_type eq 'object') { - print_api_list($data, $result_schema); + print_api_list($data, $result_schema, $props_to_print); } else { foreach my $entry (@$data) { print data_to_text($entry) . "\n"; -- 2.11.0 _______________________________________________ pve-devel mailing list pve-devel@pve.proxmox.com https://pve.proxmox.com/cgi-bin/mailman/listinfo/pve-devel