aboutsummaryrefslogtreecommitdiff
path: root/hsm-dummy-poller
diff options
context:
space:
mode:
Diffstat (limited to 'hsm-dummy-poller')
-rw-r--r--hsm-dummy-poller/Main.hs5
1 files changed, 2 insertions, 3 deletions
diff --git a/hsm-dummy-poller/Main.hs b/hsm-dummy-poller/Main.hs
index 8e6908b..d3d2f88 100644
--- a/hsm-dummy-poller/Main.hs
+++ b/hsm-dummy-poller/Main.hs
@@ -45,9 +45,8 @@ handle = S.fold S.drain . S.mapM handler
$ logInfo_ . mappend "Received pulse #" . pack . show . body @Word
delay
--- Dummy poller service:
--- Proof of concept. Polls for "pulses" through ZMQ at a set interval and
--- logs each time one is received.
+-- Dummy Poller Service: A proof of concept that polls for "pulses" via ZMQ at
+-- a set interval and logs a message each time one is received.
main :: IO ()
main =
launch @Env "dummy-poller" withoutInputEcho $ \env logger level ->