TOSQUASH 9.6 needs join import in ChainSync.Client

Author: nfrisby

ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/MiniProtocol/ChainSync/Client.hs

@@ -36,7 +36,8 @@ module Ouroboros.Consensus.MiniProtocol.ChainSync.Client (
   , TraceChainSyncClientEvent (..)
   ) where
 
-import           Control.Monad.Except
+import           Control.Monad (join)
+import           Control.Monad.Except (runExcept, throwError)
 import           Control.Tracer
 import           Data.Kind (Type)
 import           Data.Map.Strict (Map)