summaryrefslogtreecommitdiff
path: root/fig-monitor-twitch/src
diff options
context:
space:
mode:
Diffstat (limited to 'fig-monitor-twitch/src')
-rw-r--r--fig-monitor-twitch/src/Fig/Monitor/Twitch/Chatbot.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/fig-monitor-twitch/src/Fig/Monitor/Twitch/Chatbot.hs b/fig-monitor-twitch/src/Fig/Monitor/Twitch/Chatbot.hs
index 4886ffb..7dfa8c6 100644
--- a/fig-monitor-twitch/src/Fig/Monitor/Twitch/Chatbot.hs
+++ b/fig-monitor-twitch/src/Fig/Monitor/Twitch/Chatbot.hs
@@ -50,7 +50,7 @@ twitchChatbot cfg busAddr = do
, Nothing <- Map.lookup "custom-reward-id" msg.tags -> do
log $ "Received chat message from: " <> displaynm
cmds.publish "fig monitor twitch chat incoming" . encodeUtf8 . Text.unwords $
- [ displaynm, "\t", fst $ Text.breakOn "!" pfx
+ [ mconcat [displaynm, "\t", fst $ Text.breakOn "!" pfx]
, Text.intercalate "\n" $ (\(key, v) -> key <> "\t" <> v) <$> Map.toList msg.tags
] <> drop 1 msg.params
_ -> pure ()