diff options
| -rw-r--r-- | fig-monitor-discord/src/Fig/Monitor/Discord.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/fig-monitor-discord/src/Fig/Monitor/Discord.hs b/fig-monitor-discord/src/Fig/Monitor/Discord.hs index 714d10b..943b528 100644 --- a/fig-monitor-discord/src/Fig/Monitor/Discord.hs +++ b/fig-monitor-discord/src/Fig/Monitor/Discord.hs @@ -127,8 +127,9 @@ discordBot cfg busAddr = do , SExprList [] , SExprString . BS.Base64.encodeBase64 . encodeUtf8 . Text.intercalate " " $ maybe [] ((:[]) . (<>":")) replyStr <> - [ processedMsg - , Text.intercalate " " attach + mconcat + [ [processedMsg] + , attach ] ] _ -> pure () |