core: ratchet synchronization (#2653)

This commit is contained in:
spaced4ndy authored and GitHub committed 2023-07-05 19:44:21 +04:00
1 parent c329bf4ea1
commit ae17566a94
10 files changed
+411 -132

No files matched your search

-3
View File
@@ -627,9 +627,6 @@ getContactConnections db userId Contact {contactId} =
connections [] = throwError $ SEContactNotFound contactId
connections rows = pure $ map toConnection rows
getConnectionById :: DB.Connection -> User -> Int64 -> ExceptT StoreError IO Connection
getConnectionById db User {userId} connId = ExceptT $ do
firstRow toConnection (SEConnectionNotFoundById connId) $