blade/simplex-chat
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2024-12-17 17:20:21 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

make slow commands asynchronous (#258)

Browse Source
This commit is contained in:
Evgeny Poberezkin
2022-02-02 17:47:27 +00:00
committed by GitHub
parent dafdf66ada
commit 292c334460
2 changed files with 15 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Chat/View.hs
+2 -2
View File
@@ -117,8 +117,8 @@ responseToView cmd = \case
where
api = (highlight cmd :)
r = (plain cmd :)
-- this function should be `id` in case of asynchronous command responses
r' = r
-- this function should be `r` for "synchronous" command responses
r' = id
viewChatItem :: ChatInfo c -> ChatItem c d -> [StyledString]
viewChatItem chat (ChatItem cd meta content) = case (chat, cd) of