summaryrefslogtreecommitdiff
path: root/fig-monitor-discord
diff options
context:
space:
mode:
authorLLLL Colonq <llll@colonq>2024-02-09 22:41:41 -0500
committerLLLL Colonq <llll@colonq>2024-02-09 22:42:14 -0500
commit4cd98d6c22a92051c8375da8954cf1cdc63678d8 (patch)
tree5e48e7eb667f4ef204038cd12c3f4dfb9f47cb30 /fig-monitor-discord
parentb2d72a43802f82965f3bbec700a8fcd09554db6c (diff)
Stop stripping parameters off of Discord attachments
Diffstat (limited to 'fig-monitor-discord')
-rw-r--r--fig-monitor-discord/src/Fig/Monitor/Discord.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/fig-monitor-discord/src/Fig/Monitor/Discord.hs b/fig-monitor-discord/src/Fig/Monitor/Discord.hs
index 98b7ff0..a0c1b16 100644
--- a/fig-monitor-discord/src/Fig/Monitor/Discord.hs
+++ b/fig-monitor-discord/src/Fig/Monitor/Discord.hs
@@ -128,9 +128,7 @@ discordBot cfg busAddr = do
, SExprString . BS.Base64.encodeBase64 . encodeUtf8 . Text.intercalate " "
$ maybe [] ((:[]) . (<>":")) replyStr <>
[ processedMsg
- , Text.intercalate " "
- $ Text.takeWhile (/='?')
- <$> attach
+ , Text.intercalate " " attach
]
]
_ -> pure ()