Small changes

cardano-diffusion/lib/Cardano/Network/PeerSelection/Governor/Monitor.hs

@@ -163,7 +163,7 @@ targetPeers Cardano.ExtraPeerSelectionActions {
           localRootPeers' =
               LocalRootPeers.clampToLimit
                               (targetNumberOfKnownPeers targets')
-            $ (if usingBootstrapPeers
+            . (if usingBootstrapPeers
                   then LocalRootPeers.clampToTrustable
                   else id)
             $ localRootPeers

ouroboros-network/api/lib/Ouroboros/Network/Block.hs

@@ -1,12 +1,10 @@
 {-# LANGUAGE DeriveAnyClass             #-}
 {-# LANGUAGE DeriveGeneric              #-}
 {-# LANGUAGE DeriveTraversable          #-}
-{-# LANGUAGE DerivingStrategies         #-}
 {-# LANGUAGE DerivingVia                #-}
 {-# LANGUAGE FlexibleContexts           #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
 {-# LANGUAGE NamedFieldPuns             #-}
-{-# LANGUAGE NumDecimals                #-}
 {-# LANGUAGE OverloadedStrings          #-}
 {-# LANGUAGE PatternSynonyms            #-}
 {-# LANGUAGE PolyKinds                  #-}

ouroboros-network/api/lib/Ouroboros/Network/Point.hs

@@ -1,8 +1,5 @@
-{-# LANGUAGE DeriveAnyClass    #-}
-{-# LANGUAGE DeriveFoldable    #-}
-{-# LANGUAGE DeriveFunctor     #-}
-{-# LANGUAGE DeriveGeneric     #-}
-{-# LANGUAGE DeriveTraversable #-}
+{-# LANGUAGE DeriveAnyClass #-}
+{-# LANGUAGE DeriveGeneric  #-}
 
 module Ouroboros.Network.Point
   ( WithOrigin (..)