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

simplify

Browse Source
This commit is contained in:
Diogo
2024-12-11 11:33:43 +00:00
parent 38da1e2ff1
commit 0c3a742d0b
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Chat/Store/Direct.hs
+1 -1
View File
@@ -850,7 +850,7 @@ getContact :: DB.Connection -> VersionRangeChat -> User -> Int64 -> ExceptT Stor
getContact db vr user contactId = do
ct <- getContact_ db vr user contactId False
chatTags <- liftIO $ getDirectChatTags db contactId
pure (ct :: Contact) {chatTags = chatTags}
pure (ct :: Contact) {chatTags}
getContact_ :: DB.Connection -> VersionRangeChat -> User -> Int64 -> Bool -> ExceptT StoreError IO Contact
getContact_ db vr user@User {userId} contactId deleted =