S2S: Common: Remove: When deleting Collab record, delete CollabDeleg*s too

This commit is contained in:
Pere Lev 2023-12-07 18:21:35 +02:00
parent 6dceaa1cff
commit cfc8add212
No known key found for this signature in database
GPG key ID: 5252C5C863E5E57D

View file

@ -1379,6 +1379,8 @@ topicRemove grabActor topicResource topicField topicCollabField now topicKey (Ve
lift $ for maybeRemoveDB $ \ _removeDB -> do lift $ for maybeRemoveDB $ \ _removeDB -> do
-- Delete the whole Collab record -- Delete the whole Collab record
deleteBy $ UniqueCollabDelegLocal enableID
deleteBy $ UniqueCollabDelegRemote enableID
delete enableID delete enableID
case recipID of case recipID of
Left (E.Value l) -> do Left (E.Value l) -> do