Fix update imports from ouroboros-network

Author: geo2a

ouroboros-consensus-diffusion/test/consensus-test/Test/Consensus/GSM/Common.hs

@@ -15,6 +15,7 @@
 
 module Test.Consensus.GSM.Common (module Test.Consensus.GSM.Common) where
 
+import           Cardano.Network.Types (LedgerStateJudgement (..))
 import           Control.Monad (replicateM_)
 import           Control.Monad.Class.MonadFork (MonadFork, yield)
 import qualified Control.Monad.Class.MonadTime.SI as SI
@@ -23,8 +24,6 @@ import           Data.Time (diffTimeToPicoseconds)
 import qualified Data.TreeDiff as TD
 import           GHC.Generics (Generic)
 import qualified Ouroboros.Consensus.Node.GSM as GSM
-import           Ouroboros.Network.PeerSelection.LedgerPeers.Type
-                     (LedgerStateJudgement (..))
 import qualified Test.QuickCheck as QC
 import           Test.QuickCheck (elements, shrink)
 import           Test.Util.Orphans.ToExpr ()

ouroboros-consensus-diffusion/test/consensus-test/Test/Consensus/GSM/QD.hs

@@ -27,6 +27,7 @@
 --   see 'prop_sequential_iosim' for the construction and reification of the configuration.
 module Test.Consensus.GSM.QD (tests) where
 
+import           Cardano.Network.Types (LedgerStateJudgement (..))
 import           Control.Concurrent.Class.MonadSTM.Strict.TVar.Checked
 import           Control.Exception (SomeException (..))
 import           Control.Monad.Class.MonadAsync (async, poll,
@@ -47,8 +48,6 @@ import           Data.Typeable (Typeable)
 import           GHC.Generics (Generic)
 import qualified Ouroboros.Consensus.Node.GSM as GSM
 import           Ouroboros.Consensus.Util.IOLike (IOLike)
-import           Ouroboros.Network.PeerSelection.LedgerPeers.Type
-                     (LedgerStateJudgement (..))
 import           Test.Consensus.GSM.Common
 import qualified Test.QuickCheck as QC
 import           Test.QuickCheck.Gen.Unsafe (Capture (Capture), capture)

ouroboros-consensus-diffusion/test/consensus-test/Test/Consensus/GSM/QSM.hs

@@ -18,8 +18,6 @@ import qualified Data.Map.Strict as Map
 import qualified Data.Set as Set
 import qualified Ouroboros.Consensus.Node.GSM as GSM
 import           Ouroboros.Consensus.Util.IOLike (IOLike)
-import           Ouroboros.Network.PeerSelection.LedgerPeers.Type
-                     (LedgerStateJudgement (..))
 import           Test.Consensus.GSM.Common
 import           Test.Consensus.GSM.QSM.Model
 import           Test.Consensus.IOSimQSM.Test.StateMachine.Sequential

ouroboros-consensus-diffusion/test/consensus-test/Test/Consensus/GSM/QSM/Model.hs

@@ -20,8 +20,6 @@ import qualified Data.Set as Set
 import qualified Data.TreeDiff as TD
 import           GHC.Generics (Generic, Generic1)
 import qualified Ouroboros.Consensus.Node.GSM as GSM
-import           Ouroboros.Network.PeerSelection.LedgerPeers.Type
-                     (LedgerStateJudgement (..))
 import           Test.Consensus.GSM.Common
 import qualified Test.QuickCheck as QC
 import           Test.QuickCheck (choose, elements, shrink)