Avoid specifying unnecessary language extensions

hw-prelude.cabal

@@ -53,6 +53,7 @@ common project-config
                         FlexibleContexts
                         FlexibleInstances
                         LambdaCase
+                        MultiWayIf
                         NoFieldSelectors
                         NoImplicitPrelude
                         OverloadedRecordDot

src/HaskellWorks/Error/Types.hs

@@ -1,6 +1,3 @@
-{-# LANGUAGE DuplicateRecordFields #-}
-{-# LANGUAGE TypeSynonymInstances  #-}
-
 module HaskellWorks.Error.Types (
     GenericError (..),
     TimedOut(..),

src/HaskellWorks/Error/Types/GenericError.hs

@@ -1,7 +1,3 @@
-{-# LANGUAGE DeriveGeneric         #-}
-{-# LANGUAGE DuplicateRecordFields #-}
-{-# LANGUAGE TypeSynonymInstances  #-}
-
 module HaskellWorks.Error.Types.GenericError (
     GenericError (..),
 ) where

src/HaskellWorks/Error/Types/TimedOut.hs

@@ -1,7 +1,3 @@
-{-# LANGUAGE DeriveGeneric         #-}
-{-# LANGUAGE DuplicateRecordFields #-}
-{-# LANGUAGE TypeSynonymInstances  #-}
-
 module HaskellWorks.Error.Types.TimedOut (
     TimedOut (..),
 ) where

src/HaskellWorks/IO/Network/Port.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE TypeApplications #-}
-
 module HaskellWorks.IO.Network.Port
   ( randomPort,
     reserveRandomPort,

src/HaskellWorks/IO/Network/Socket.hs

@@ -1,6 +1,3 @@
-{-# LANGUAGE ScopedTypeVariables #-}
-{-# LANGUAGE TypeApplications    #-}
-
 module HaskellWorks.IO.Network.Socket
   ( doesSocketExist,
     isPortOpen,

src/HaskellWorks/IO/Win32/NamedPipe.hsc

@@ -1,8 +1,7 @@
 #include <fcntl.h>
 #include <windows.h>
 
-{-# LANGUAGE CPP                #-}
-{-# LANGUAGE MultiWayIf         #-}
+{-# LANGUAGE CPP #-}
 
 -- | For full details on the Windows named pipes API see
 -- <https://docs.microsoft.com/en-us/windows/desktop/ipc/named-pipes>