From 828b424422d8ba17322eb08a22ca4f3815cf0ed3 Mon Sep 17 00:00:00 2001
From: LLLL Colonq <llll@colonq>
Date: Sun, 21 Apr 2024 01:39:13 -0400
Subject: Don't add a trailing space

---
 fig-monitor-discord/src/Fig/Monitor/Discord.hs | 5 +++--
 1 file 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 ()
-- 
cgit v1.2.3