From 9d2f95bb58f856aaf9142426e90e5783c98af8f1 Mon Sep 17 00:00:00 2001 From: Paul Oliver Date: Mon, 27 Jan 2025 14:51:28 +0000 Subject: Makes doc-comments cleaner/more elegant --- hsm-status/Main.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'hsm-status') diff --git a/hsm-status/Main.hs b/hsm-status/Main.hs index 634d1d1..594661b 100644 --- a/hsm-status/Main.hs +++ b/hsm-status/Main.hs @@ -73,8 +73,8 @@ mapper :: Env -> Bool -> Set GPIO mapper env True = singleton env.gpioOk mapper env False = singleton env.gpioError --- Status service blinks a GPIO pin periodically and listens for error --- messages. If an error is received it switches to a different pin. +-- Status Service: Periodically blinks a GPIO pin and listens for error +-- messages. Upon receiving an error, it switches to a different pin. main :: IO () main = launch "status" withoutInputEcho $ \env logger level -> -- cgit v1.2.1