getChats returns [Chat] with 0-1 item instead of [ChatPreview] (#240)

This commit is contained in:
Evgeny Poberezkin
2022-01-30 21:51:23 +00:00
committed by GitHub
parent 3b19aaf1d1
commit e29ea99d2c
3 changed files with 21 additions and 44 deletions

View File

@@ -117,7 +117,7 @@ data ChatCommand
deriving (Show)
data ChatResponse
= CRApiChats {chats :: [AChatPreview]}
= CRApiChats {chats :: [AChat]}
| CRApiChat {chat :: AChat}
| CRNewChatItem {chatItem :: AChatItem}
| CRCmdAccepted {corr :: CorrId}