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:
93df063
)
ignore interval option without input file
author
Mischa POSLAWSKY
<perl@shiar.org>
Fri, 24 Jan 2020 20:59:05 +0000
(21:59 +0100)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Fri, 24 Jan 2020 21:51:04 +0000
(22:51 +0100)
barcat
patch
|
blob
|
history
diff --git
a/barcat
b/barcat
index 3df9408e6acec8878cc8045e01cf931f6e54485c..144b6244d0bd3970bdc1e36dbea987a330cb2566 100755
(executable)
--- a/
barcat
+++ b/
barcat
@@
-111,7
+111,8
@@
$opt{'value-length'} = 1 if $opt{unmodified};
$opt{'signal-stat'} //= exists $SIG{INFO} ? 'INFO' : 'QUIT';
$opt{markers} //= '=avg >31.73v <68.27v +50v |0';
$opt{palette} //= $opt{color} && [31, 90, 32];
$opt{'signal-stat'} //= exists $SIG{INFO} ? 'INFO' : 'QUIT';
$opt{markers} //= '=avg >31.73v <68.27v +50v |0';
$opt{palette} //= $opt{color} && [31, 90, 32];
-$opt{input} = @ARGV && $ARGV[0] =~ m/\A[-0-9]/ ? \@ARGV : undef;
+$opt{input} = @ARGV && $ARGV[0] =~ m/\A[-0-9]/ ? \@ARGV : undef
+ and undef $opt{interval};
my (@lines, @values, @order);
my (@lines, @values, @order);