From 7a0f8be44a1a0ad27f7f97c66f535179b9f74442 Mon Sep 17 00:00:00 2001
From: Daniel Firth <daniel.firth@iohk.io>
Date: Sun, 8 Dec 2024 20:16:34 +0000
Subject: [PATCH] Remove unused function matchFanout

---
 hydra-node/test/Hydra/BehaviorSpec.hs | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/hydra-node/test/Hydra/BehaviorSpec.hs b/hydra-node/test/Hydra/BehaviorSpec.hs
index c81a39db760..4fa1ce1cf10 100644
--- a/hydra-node/test/Hydra/BehaviorSpec.hs
+++ b/hydra-node/test/Hydra/BehaviorSpec.hs
@@ -1183,11 +1183,6 @@ openHead chain n1 n2 = do
   waitUntil [n1, n2] $ Committed testHeadId bob (utxoRef 2)
   waitUntil [n1, n2] $ HeadIsOpen{headId = testHeadId, utxo = utxoRefs [1, 2]}
 
-matchFanout :: PostChainTx tx -> Bool
-matchFanout = \case
-  FanoutTx{} -> True
-  _ -> False
-
 assertHeadIsClosed :: (HasCallStack, MonadThrow m) => ServerOutput tx -> m ()
 assertHeadIsClosed = \case
   HeadIsClosed{} -> pure ()