From c2da1da9f447091e45a39211b1de87176b6254b6 Mon Sep 17 00:00:00 2001 From: Pere Lev Date: Sat, 27 Apr 2024 12:25:13 +0300 Subject: [PATCH] S2S: Project: Accept: Add-child-passive: Fix bug, no need to record the Accept in the Source --- src/Vervis/Actor/Project.hs | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/Vervis/Actor/Project.hs b/src/Vervis/Actor/Project.hs index 3b23f48..5477bfb 100644 --- a/src/Vervis/Actor/Project.hs +++ b/src/Vervis/Actor/Project.hs @@ -881,12 +881,14 @@ projectAccept now projectID (Verse authorIdMsig body) accept = do -- Record my collaborator's Accept -- Prepare to send delegator-Grant Right () -> Just <$> do + {- case (topic, acceptDB) of (Left (localID, _), Left (_, _, acceptID)) -> - insert_ $ SourceThemAcceptLocal localID acceptID + insert_ $ ? localID acceptID (Right (remoteID, _), Right (_, _, acceptID)) -> - insert_ $ SourceThemAcceptRemote remoteID acceptID + insert_ $ ? remoteID acceptID _ -> error "projectAccept impossible iv" + -} grantID <- insertEmptyOutboxItem' (actorOutbox recipActor) now insert_ $ SourceUsSendDelegator sourceID grantID return (topic, grantID)