diff options
| author | LLLL Colonq <llll@colonq> | 2024-04-21 01:39:13 -0400 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2024-04-21 01:39:13 -0400 |
| commit | 828b424422d8ba17322eb08a22ca4f3815cf0ed3 (patch) | |
| tree | 0e5aba545982719ea059d0e9c5ec8c6825f5d3a0 /fig-monitor-discord/src | |
| parent | 432ff585d9fa0aafcf898a2e8e8be2d5b4524874 (diff) | |
Don't add a trailing space
Diffstat (limited to 'fig-monitor-discord/src')
| -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 () |