added audible terminal bel sound for alarm

travgm · Nov 14, 2024 · 31bf702 · 31bf702
1 parent f0eb635
commit 31bf702
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Lib/PrettyPrinter.hs b/Lib/PrettyPrinter.hs
@@ -58,7 +58,7 @@ formatTime status state = case (status, state) of
   (Error err, _) ->
     "Decimal time: " <> T.pack err
   (AlarmReached _, Right s) ->
-    baseTimeText s <> " ALARM!"
+    baseTimeText s <> " ALARM!\BEL"
   (Normal, Right s) ->
     baseTimeText s
   (_, _) ->