diff --git a/ouroboros-network-framework/io-tests/Test/Ouroboros/Network/Server2/IO.hs b/ouroboros-network-framework/io-tests/Test/Ouroboros/Network/Server2/IO.hs
index 95cb49f920c..397cc9d591f 100644
--- a/ouroboros-network-framework/io-tests/Test/Ouroboros/Network/Server2/IO.hs
+++ b/ouroboros-network-framework/io-tests/Test/Ouroboros/Network/Server2/IO.hs
@@ -1,18 +1,11 @@
 {-# LANGUAGE CPP                 #-}
 {-# LANGUAGE ConstraintKinds     #-}
 {-# LANGUAGE DataKinds           #-}
-{-# LANGUAGE DeriveFunctor       #-}
 {-# LANGUAGE FlexibleContexts    #-}
 {-# LANGUAGE GADTs               #-}
-{-# LANGUAGE LambdaCase          #-}
-{-# LANGUAGE NamedFieldPuns      #-}
 {-# LANGUAGE PolyKinds           #-}
 {-# LANGUAGE RankNTypes          #-}
-{-# LANGUAGE RecordWildCards     #-}
 {-# LANGUAGE ScopedTypeVariables #-}
-{-# LANGUAGE TupleSections       #-}
-{-# LANGUAGE TypeApplications    #-}
-{-# LANGUAGE TypeOperators       #-}
 
 #if __GLASGOW_HASKELL__ >= 908
 {-# OPTIONS_GHC -Wno-x-partial #-}
@@ -42,8 +35,8 @@ tests :: TestTree
 tests =
   testGroup "Ouroboros.Network"
   [ testGroup "Server2"
-    [ testProperty "unidirectional IO"      prop_unidirectional_IO
-    , testProperty "bidirectional IO"       prop_bidirectional_IO
+    [ testProperty "unidirectional IO" prop_unidirectional_IO
+    , testProperty "bidirectional IO"  prop_bidirectional_IO
     ]
   ]