dispel redundant import warnings

Minimum supported version of GHC moved to 8.8.  Now we can clean up
some old redundant import warnings.

example/KeyDB.hs

@@ -9,7 +9,6 @@ module KeyDB
 
 import Control.Exception (IOException, handle)
 import Data.Maybe (catMaybes)
-import Data.Semigroup ((<>))
 
 import Control.Monad.Trans (MonadIO(..))
 import Control.Lens (_Just, preview)

example/Main.hs

@@ -2,7 +2,6 @@
 {-# LANGUAGE FlexibleContexts #-}
 
 import Data.Maybe (fromJust)
-import Data.Semigroup ((<>))
 import System.Environment (getArgs)
 import System.Exit (die, exitFailure)
 

src/Crypto/JOSE/Error.hs

@@ -41,7 +41,6 @@ module Crypto.JOSE.Error
 
   ) where
 
-import Data.Semigroup ((<>))
 import Numeric.Natural
 
 import Control.Monad.Except (MonadError(..), ExceptT, runExceptT)

src/Crypto/JOSE/Header.hs

@@ -66,7 +66,6 @@ module Crypto.JOSE.Header
 import qualified Control.Monad.Fail as Fail
 import Data.Kind (Type)
 import Data.List.NonEmpty (NonEmpty)
-import Data.Monoid ((<>))
 import Data.Proxy (Proxy(..))
 
 import Control.Lens (Lens', Getter, review, to)

src/Crypto/JOSE/JWA/JWK.hs

@@ -77,7 +77,6 @@ import Control.Monad.Except (MonadError)
 import Data.Bifunctor
 import Data.Foldable (toList)
 import Data.Maybe (isJust)
-import Data.Monoid ((<>))
 
 import Control.Lens hiding ((.=), elements)
 import Control.Monad.Error.Lens (throwing, throwing_)

src/Crypto/JOSE/JWE.hs

@@ -27,7 +27,6 @@ module Crypto.JOSE.JWE
 import Control.Applicative ((<|>))
 import Data.Bifunctor (bimap)
 import Data.Maybe (catMaybes, fromMaybe)
-import Data.Monoid ((<>))
 
 import Control.Lens (view, views)
 import Data.Aeson

src/Crypto/JOSE/JWK.hs

@@ -92,7 +92,6 @@ import Control.Applicative
 import Control.Monad ((>=>))
 import Data.Function (on)
 import Data.Maybe (catMaybes)
-import Data.Monoid ((<>))
 import Data.Word (Word8)
 
 import Control.Lens hiding ((.=))

src/Crypto/JOSE/JWS.hs

@@ -92,7 +92,6 @@ import Control.Applicative ((<|>))
 import Control.Monad (unless)
 import Data.Foldable (toList)
 import Data.Maybe (catMaybes, fromMaybe)
-import Data.Monoid ((<>))
 import Data.List.NonEmpty (NonEmpty)
 import Data.Word (Word8)
 

src/Crypto/JWT.hs

@@ -95,7 +95,6 @@ import Data.Foldable (traverse_)
 import Data.Functor.Identity
 import Data.Maybe
 import qualified Data.String
-import Data.Semigroup ((<>))
 
 import Control.Lens (
   makeClassy, makeClassyPrisms, makePrisms,

test/JWK.hs

@@ -19,8 +19,6 @@ module JWK
   ( spec
   ) where
 
-import Data.Monoid ((<>))
-
 import Control.Lens (_Left, _Right, review, view)
 import Control.Lens.Extras (is)
 import Data.Aeson

test/JWS.hs

@@ -19,7 +19,6 @@ module JWS
   ) where
 
 import Data.Maybe
-import Data.Monoid ((<>))
 
 import Control.Lens hiding ((.=))
 import Control.Lens.Extras (is)

test/JWT.hs

@@ -20,7 +20,6 @@ module JWT
   ) where
 
 import Data.Maybe
-import Data.Monoid ((<>))
 
 import qualified Data.ByteString.Lazy as L
 import Control.Lens