Change the internal state before emitting DecommitFinalized

input-output-hk · May 7, 2024 · 512b79f · 512b79f
1 parent e2c7bd2
commit 512b79f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/hydra-node/src/Hydra/HeadLogic.hs b/hydra-node/src/Hydra/HeadLogic.hs
@@ -912,8 +912,8 @@ update env ledger st ev = case (st, ev) of
     )
       -- TODO: What happens if observed decrement tx get's rolled back?
       | ourHeadId == headId ->
-          cause (ClientEffect $ ServerOutput.DecommitFinalized{headId})
-            <> newState DecommitFinalized
+          newState DecommitFinalized
+            <> cause (ClientEffect $ ServerOutput.DecommitFinalized{headId})
       | otherwise ->
           Error NotOurHead{ourHeadId, otherHeadId = headId}
   -- Closed