proxmox-mirrors/qemu-server
1
0
Fork 0
mirror of https://git.proxmox.com/git/qemu-server synced 2025-08-16 06:28:47 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

qm status: sort hash keys on verbose output

Browse Source 
Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
This commit is contained in:
Thomas Lamprecht 2021-03-11 15:04:26 +01:00
parent 31c8e14bf2
commit 7f0285e133
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
PVE/CLI/qm.pm
View File

@ -100,14 +100,14 @@ sub print_recursive_hash {
if (defined($key)) { if (defined($key)) {
print "$prefix$key:\n"; print "$prefix$key:\n";
} }
foreach my $itemkey (keys %$hash) { for my $itemkey (sort keys %$hash) {
print_recursive_hash("\t$prefix", $hash->{$itemkey}, $itemkey); print_recursive_hash("\t$prefix", $hash->{$itemkey}, $itemkey);
} }
} elsif (ref($hash) eq 'ARRAY') { } elsif (ref($hash) eq 'ARRAY') {
if (defined($key)) { if (defined($key)) {
print "$prefix$key:\n"; print "$prefix$key:\n";
} }
foreach my $item (@$hash) { for my $item (@$hash) {
print_recursive_hash("\t$prefix", $item); print_recursive_hash("\t$prefix", $item);
} }
} elsif ((!ref($hash) && defined($hash)) || ref($hash) eq 'JSON::PP::Boolean') { } elsif ((!ref($hash) && defined($hash)) || ref($hash) eq 'JSON::PP::Boolean') {