From: Mischa POSLAWSKY <perl@shiar.org>
Date: Fri, 24 Jan 2020 21:59:27 +0000 (+0100)
Subject: silence warning calculating size of zero values
X-Git-Tag: v1.07~14
X-Git-Url: http://git.shiar.net/barcat.git/commitdiff_plain/5e9cdc295d969b9ff58c7df99c7795704fe4e555

silence warning calculating size of zero values
---

diff --git a/barcat b/barcat
index 77d35ad..1c9f027 100755
--- a/barcat
+++ b/barcat
@@ -245,7 +245,7 @@ say(
 while ($nr <= $#lines) {
 	$nr >= $opt{hidemax} and last if defined $opt{hidemax};
 	my $val = $values[$nr];
-	my $rel = length $val && ($val - $minval) / ($maxval - $minval);
+	my $rel = length $val && ($maxval - $minval) && ($val - $minval) / ($maxval - $minval);
 	my $color = !length $val || !$opt{palette} ? undef :
 		$val == $order[0] ? $opt{palette}->[-1] : # max
 		$val == $order[-1] ? $opt{palette}->[0] : # min
diff --git a/t/t1710-zero_value_--_0.out b/t/t1710-zero_value_--_0.out
index e69de29..ff95acd 100644
--- a/t/t1710-zero_value_--_0.out
+++ b/t/t1710-zero_value_--_0.out
@@ -0,0 +1 @@
+0