From: Mischa POSLAWSKY <perl@shiar.org>
Date: Wed, 11 Sep 2019 14:42:25 +0000 (+0200)
Subject: respond to alarm signal regardless of interval
X-Git-Tag: v1.06~13
X-Git-Url: http://git.shiar.nl/barcat.git/commitdiff_plain/16a1e0d2c7a16ed375bffdbcbda7c66d11121ef8

respond to alarm signal regardless of interval
---

diff --git a/barcat b/barcat
index 1818493..b051353 100755
--- a/barcat
+++ b/barcat
@@ -83,12 +83,13 @@ $opt{'value-length'} = 1 if $opt{unmodified};
 
 my (@lines, @values, @order);
 
+$SIG{ALRM} = sub {
+	show_lines();
+	alarm $opt{interval} if defined $opt{interval};
+};
+
 if (defined $opt{interval}) {
 	$opt{interval} ||= 1;
-	$SIG{ALRM} = sub {
-		show_lines();
-		alarm $opt{interval};
-	};
 	alarm $opt{interval};
 
 	eval {
@@ -286,6 +287,7 @@ Short integers are aligned but kept without decimal point.
 =item -t, --interval[=<seconds>]
 
 Interval time to output partial progress.
+An update can also be forced by sending a I<SIGALRM> alarm signal.
 
 =item -l, --length=[-]<size>[%]