summaryrefslogtreecommitdiff
path: root/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs
diff options
context:
space:
mode:
Diffstat (limited to 'fig-monitor-twitch/src/Fig/Monitor/Twitch.hs')
-rw-r--r--fig-monitor-twitch/src/Fig/Monitor/Twitch.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs b/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs
index 5f97209..d4eca81 100644
--- a/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs
+++ b/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs
@@ -478,7 +478,9 @@ twitchChannelLiveMonitor cfg busAddr = do
loop = do
log "Updating liveness..."
live <- runAuthed cfg $ usersAreLive cfg.monitor
- log $ "Update complete! Live users: " <> Text.unwords (Set.toList live)
+ if null live
+ then log "Update complete! No users live"
+ else log $ "Update complete! Live users: " <> Text.unwords (Set.toList live)
cmds.publish "monitor twitch stream online" . encodeUtf8 . Text.unwords $ Set.toList live
threadDelay $ 5 * 60 * 1000000 -- wait 5 minutes
loop