Sort the parties before comparing

input-output-hk · Mar 17, 2023 · c75b024 · c75b024
1 parent 2141d70
commit c75b024
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/hydra-node/exe/hydra-node/Main.hs b/hydra-node/exe/hydra-node/Main.hs
@@ -139,7 +139,7 @@ main = do
       let res = flip execState [] $ do
             when (Hydra.Chain.contestationPeriod params /= cp) $
               modify (\s -> s <> ["Contestation period does not match. "])
-            when (Hydra.Chain.parties params /= envParties) $
+            when (sort (Hydra.Chain.parties params) /= sort envParties) $
               modify (\s -> s <> ["Parties mismatch. "])
        in case res of
             [] -> []