git://git.jankratochvil.net
/
nethome.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2dcd619
)
bin/heat: Accept also 12.34 (besides 12:34).
author
Jan Kratochvil
<jan@jankratochvil.net>
Fri, 21 Jan 2022 07:56:56 +0000
(08:56 +0100)
committer
Jan Kratochvil
<jan@jankratochvil.net>
Fri, 21 Jan 2022 07:56:56 +0000
(08:56 +0100)
bin/heat
patch
|
blob
|
history
diff --git
a/bin/heat
b/bin/heat
index
77dac14
..
2320115
100755
(executable)
--- 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);
}