summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--fig-monitor-discord/src/Fig/Monitor/Discord.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/fig-monitor-discord/src/Fig/Monitor/Discord.hs b/fig-monitor-discord/src/Fig/Monitor/Discord.hs
index 943b528..ff05e34 100644
--- a/fig-monitor-discord/src/Fig/Monitor/Discord.hs
+++ b/fig-monitor-discord/src/Fig/Monitor/Discord.hs
@@ -125,7 +125,7 @@ discordBot cfg busAddr = do
[ SExprInteger . fromIntegral . Dis.unSnowflake $ Dis.unId chan
, SExprString . BS.Base64.encodeBase64 $ encodeUtf8 name
, SExprList []
- , SExprString . BS.Base64.encodeBase64 . encodeUtf8 . Text.intercalate " "
+ , SExprString . BS.Base64.encodeBase64 . encodeUtf8 . Text.strip . Text.intercalate " "
$ maybe [] ((:[]) . (<>":")) replyStr <>
mconcat
[ [processedMsg]