terminal: show message that failed to parse (#2439)

This commit is contained in:
Evgeny Poberezkin
2023-05-15 13:47:16 +02:00
committed by GitHub
parent 817c0a5672
commit d62761b3a8
3 changed files with 3 additions and 3 deletions
+1 -1
View File
@@ -4151,7 +4151,7 @@ parseAChatMessage = parseChatMessage_
{-# INLINE parseAChatMessage #-}
parseChatMessage_ :: (ChatMonad m, StrEncoding s) => ByteString -> m s
parseChatMessage_ = liftEither . first (ChatError . CEInvalidChatMessage) . strDecode
parseChatMessage_ s = liftEither . first (ChatError . CEInvalidChatMessage (safeDecodeUtf8 s)) $ strDecode s
sendFileChunk :: ChatMonad m => User -> SndFileTransfer -> m ()
sendFileChunk user ft@SndFileTransfer {fileId, fileStatus, agentConnId = AgentConnId acId} =