From 8f67f0c55b845c80973fcec0fbaef9879f677b91 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Sun, 5 Oct 2025 19:53:36 -0400 Subject: fig-monitor-twitch: Print failed poll --- fig-monitor-twitch/src/Fig/Monitor/Twitch.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'fig-monitor-twitch/src/Fig/Monitor/Twitch.hs') diff --git a/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs b/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs index d4eca81..3183256 100644 --- a/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs +++ b/fig-monitor-twitch/src/Fig/Monitor/Twitch.hs @@ -425,7 +425,7 @@ twitchEventClient cfg busAddr = do let schoices = (\(t, v) -> t <> "," <> v) <$> choices log $ "Poll end: " <> pollid cmds.publish "monitor twitch poll end" . encodeUtf8 . Text.unwords $ [pollid] <> schoices - _else -> log "Failed to extract ID from payload for poll end event" + _else -> log $ "Failed to extract ID from payload for poll end event: " <> tshow res _else -> log $ "Received unknown notification event: " <> tshow resp Just "session_keepalive" -> pure () _else -> log $ "Received unknown response: " <> tshow resp -- cgit v1.2.3