git.shiar.nl
/
barcat.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
678a3ea
)
apply value formatting to statistics
author
Mischa POSLAWSKY
<perl@shiar.org>
Sat, 27 Mar 2021 21:58:25 +0000
(22:58 +0100)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Mon, 18 Apr 2022 09:04:29 +0000
(11:04 +0200)
barcat
patch
|
blob
|
history
diff --git
a/barcat
b/barcat
index cc3f607a990787bdb985d9735aeb7a23079c45a3..82f0fffd51870985cf19a30503e9e4dcb24535f6 100755
(executable)
--- a/
barcat
+++ b/
barcat
@@
-326,9
+326,9
@@
sub show_stat {
printf ' in %d values', scalar @order;
printf ' over %d lines', scalar @lines if @order != @lines;
printf(' (%s min, %s avg, %s max)',
printf ' in %d values', scalar @order;
printf ' over %d lines', scalar @lines if @order != @lines;
printf(' (%s min, %s avg, %s max)',
- color(31) .
$order[-1]
. color(0),
- color(36) .
$opt{'calc-format'}
->($total / @order) . color(0),
- color(32) .
$order[0]
. color(0),
+ color(31) .
($opt{'value-format'} || sub {$_[0]})->($order[-1])
. color(0),
+ color(36) .
($opt{'value-format'} || $opt{'calc-format'})
->($total / @order) . color(0),
+ color(32) .
($opt{'value-format'} || sub {$_[0]})->($order[0])
. color(0),
);
}
say '';
);
}
say '';