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

core: fix duplicate error on group link creation (#6204)

Browse Source 
* core: fix duplicate error on group link creation

* fix

* fix
This commit is contained in:
spaced4ndy authored and GitHub committed 2025-08-19 17:17:47 +01:00
1 parent fabac3030f
commit c5e05a10c0
2 files changed
+9 -6
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

src/Simplex/Chat/Library/Commands.hs
+2 -1
View File
@@ -2556,7 +2556,8 @@ processChatCommand vr nm = \case
-- TODO [certs rcv]
(connId, (ccLink, _serviceId)) <- withAgent $ \a -> createConnection a nm (aUserId user) True SCMContact (Just userData) (Just crClientData) IKPQOff subMode
ccLink' <- createdGroupLink <$> shortenCreatedLink ccLink
gLink <- withFastStore $ \db -> createGroupLink db user gInfo connId ccLink' groupLinkId mRole subMode
gVar <- asks random
gLink <- withFastStore $ \db -> createGroupLink db gVar user gInfo connId ccLink' groupLinkId mRole subMode
pure $ CRGroupLinkCreated user gInfo gLink
APIGroupLinkMemberRole groupId mRole' -> withUser $ \user -> withGroupLock "groupLinkMemberRole" groupId $ do
gInfo <- withFastStore $ \db -> getGroupInfo db vr user groupId