Remove qualified import

cardano-scaling · Mar 1, 2024 · f2b6c70 · f2b6c70
1 parent e5aeb4a
commit f2b6c70
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/hydra-explorer/test/Hydra/Explorer/ExplorerStateSpec.hs b/hydra-explorer/test/Hydra/Explorer/ExplorerStateSpec.hs
@@ -6,7 +6,6 @@ import Test.Hydra.Prelude
 import Hydra.Cardano.Api (ChainPoint (..))
 import Hydra.ChainObserver (HeadObservationAt (..))
 import Hydra.Explorer.ExplorerState (ExplorerState (..), HeadState (..), aggregateHeadObservations)
-import Hydra.Explorer.ExplorerState qualified as ExplorerState
 import Hydra.HeadId (HeadId)
 import Hydra.OnChainId ()
 import Test.QuickCheck (forAll, suchThat, (=/=))
@@ -31,4 +30,4 @@ spec = do
   genObservations = arbitrary `suchThat` (not . null) `suchThat` any (isJust . onChainTx)
 
   getHeadIds :: [HeadState] -> [HeadId]
-  getHeadIds = fmap ExplorerState.headId
+  getHeadIds = fmap headId