From 16a1e0d2c7a16ed375bffdbcbda7c66d11121ef8 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Wed, 11 Sep 2019 16:42:25 +0200
Subject: [PATCH] respond to alarm signal regardless of interval

---
 barcat | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

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>[%]
 
-- 
2.30.0