ambiser
/
btrbk
mirror of https://github.com/digint/btrbk
9
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

btrbk: print_formatted(): honor use_header argument for all table formats

pull/88/head
Axel Burri 2016-04-15 21:42:38 +02:00
parent 9afe17f738
commit 1151d2c572
1 changed files with 12 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
btrbk
View File

@ -3059,6 +3059,7 @@ sub print_formatted(@)
} }
# print keys (headings) # print keys (headings)
unless($args{no_header}) {
my $fill = 0; my $fill = 0;
foreach (@$keys) { foreach (@$keys) {
print $fh ' ' x $fill; print $fh ' ' x $fill;
@ -3072,6 +3073,7 @@ sub print_formatted(@)
} }
print $fh "\n"; print $fh "\n";
print $fh join(' ' x $table_spacing, map { '-' x ($maxlen{$_}) } @$keys) . "\n"; print $fh join(' ' x $table_spacing, map { '-' x ($maxlen{$_}) } @$keys) . "\n";
}
# print values # print values
foreach my $row (@$data) { foreach my $row (@$data) {