From 9d2f95bb58f856aaf9142426e90e5783c98af8f1 Mon Sep 17 00:00:00 2001
From: Paul Oliver <contact@pauloliver.dev>
Date: Mon, 27 Jan 2025 14:51:28 +0000
Subject: Makes doc-comments cleaner/more elegant

---
 hsm-dummy-blinker/Main.hs | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'hsm-dummy-blinker')

diff --git a/hsm-dummy-blinker/Main.hs b/hsm-dummy-blinker/Main.hs
index 9405ae3..5c7cb13 100644
--- a/hsm-dummy-blinker/Main.hs
+++ b/hsm-dummy-blinker/Main.hs
@@ -50,9 +50,8 @@ handle = S.fold S.drain . S.mapM handler
       env <- ask @Env
       toggle sta () [env.period, 0]
 
--- Dummy blinker service:
--- Proof of concept. This service toggles a GPIO on and off using a set
--- period.
+-- Dummy Blinker Service: A proof of concept that toggles a GPIO pin on and
+-- off at a set interval.
 main :: IO ()
 main =
   launch @Env "dummy-blinker" withoutInputEcho $ \env logger level ->
-- 
cgit v1.2.1