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
(from parent 1:
11b7356
)
coloured bar markers
author
Mischa POSLAWSKY
<perl@shiar.org>
Wed, 4 Sep 2019 18:22:54 +0000
(20:22 +0200)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Thu, 5 Sep 2019 03:11:33 +0000
(
05:11
+0200)
graph
patch
|
blob
|
history
diff --git
a/graph
b/graph
index 4bc6627588fe6d5a05022a6fdbc1f124ac82be87..83a3a880adaeab4cde199de30081bdb5a92e5125 100755
(executable)
--- a/
graph
+++ b/
graph
@@
-16,6
+16,7
@@
my $size = ($width - $lenval - $len) / $order[0]; # bar multiplication
sub orderpos { ($order[$_[0]] + $order[$_[0] + .5]) / 2 * $size }
my @barmark;
$barmark[ orderpos($#order / 2) ] = '+'; # mean
+defined and $_ = "\e[36m$_\e[0m" for @barmark;
for my $nr (0 .. $#lines) {
my $val = $values[$nr];