From 88379d29f08d3f32d564ee3ae39d58cd6482176a Mon Sep 17 00:00:00 2001 From: Jan Kratochvil Date: Fri, 21 Jan 2022 08:56:56 +0100 Subject: [PATCH] bin/heat: Accept also 12.34 (besides 12:34). --- bin/heat | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bin/heat b/bin/heat index 77dac14..2320115 100755 --- a/bin/heat +++ b/bin/heat @@ -92,7 +92,7 @@ sub finish() { my $reset=readfile $resetfile if -e $resetfile; my($resetminutes,$resetstate); sub resetread() { - $reset=~/^0?(\d+):0?(\d+) ([01s]|reset)\n$/ or warn "Invalid $resetfile: $reset"; + $reset=~/^0?(\d+)[:.]0?(\d+) ([01s]|reset)\n$/ or warn "Invalid $resetfile: $reset"; $resetminutes=$1*60+$2; $resetstate=($3 eq "reset"?undef:$3); } -- 1.8.3.1