From 1141e3ccd38cae6fffa7222f1623421b746519b7 Mon Sep 17 00:00:00 2001
From: Jan Kratochvil <jan@jankratochvil.net>
Date: Fri, 7 Jan 2022 19:40:21 +0100
Subject: [PATCH] bin/heat: Fix scheduler regression.

---
 bin/heat | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/heat b/bin/heat
index 9227df5..f30ffe1 100755
--- a/bin/heat
+++ b/bin/heat
@@ -131,7 +131,7 @@ sub printminutes($) {
 if ($silent) {
   if (!defined $newstate&&!defined $reset&&%schedule) {
     my $prev=schedulenext($minutes)->[0];
-    if ($prev=~m{^@[ printminutes $minutes ] (.)\n$}) {
+    if ($prev=~m{^@{[ printminutes $minutes ]} (.)\n$}) {
       $newstate=$1;
       logmsg "scheduled: $prev";
     }
-- 
1.8.3.1