dandri/simplex-chat
1
0 Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2026-10-23 08:33:09 +00:00
Code Issues Packages Projects Releases Wiki Activity

core: lints (#1144)

Browse Source
This commit is contained in:
Evgeny Poberezkin authored and GitHub committed 2022-09-29 16:26:43 +01:00
1 parent 0e411b0eac
commit 628f119151
10 files changed
+18 -8
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

src/Simplex/Chat/Store.hs
+4 -4
View File
@@ -2671,8 +2671,8 @@ createNewRcvChatItem db user chatDirection RcvMessage {msgId, chatMsgEvent} shar
(Just $ Just userMemberId == memberId, memberId)
createNewChatItemNoMsg :: forall c d. MsgDirectionI d => DB.Connection -> User -> ChatDirection c d -> CIContent d -> UTCTime -> UTCTime -> IO ChatItemId
createNewChatItemNoMsg db user chatDirection ciContent itemTs createdAt =
createNewChatItem_ db user chatDirection Nothing Nothing ciContent quoteRow itemTs createdAt
createNewChatItemNoMsg db user chatDirection ciContent =
createNewChatItem_ db user chatDirection Nothing Nothing ciContent quoteRow
where
quoteRow :: NewQuoteRow
quoteRow = (Nothing, Nothing, Nothing, Nothing, Nothing)
@@ -3563,8 +3563,8 @@ deleteGroupChatItemInternal db user gInfo itemId = do
pure ci
deleteGroupChatItemRcvBroadcast :: DB.Connection -> User -> GroupInfo -> ChatItemId -> MessageId -> ExceptT StoreError IO AChatItem
deleteGroupChatItemRcvBroadcast db user gInfo itemId msgId =
deleteGroupChatItemBroadcast_ db user gInfo itemId False msgId
deleteGroupChatItemRcvBroadcast db user gInfo itemId =
deleteGroupChatItemBroadcast_ db user gInfo itemId False
deleteGroupChatItemSndBroadcast :: DB.Connection -> User -> GroupInfo -> ChatItemId -> MessageId -> ExceptT StoreError IO AChatItem
deleteGroupChatItemSndBroadcast db user gInfo itemId msgId = do