unsupporting GHC < 8.6.5, removing unecessary imports

This commit is contained in:
akhesaCaro 2021-09-12 10:50:53 +02:00 committed by akhesacaro
parent 1fa1878180
commit 6e5dffbb91
20 changed files with 0 additions and 36 deletions

View File

@ -24,7 +24,6 @@ Language extensions and imports:
import Control.Lens ((^.)) import Control.Lens ((^.))
import Data.Aeson import Data.Aeson
import Data.Aeson.Text import Data.Aeson.Text
import Data.Monoid ((<>))
import Data.Proxy (Proxy (Proxy)) import Data.Proxy (Proxy (Proxy))
import Data.Text (Text) import Data.Text (Text)
import Data.Text.Encoding (decodeUtf8) import Data.Text.Encoding (decodeUtf8)

View File

@ -20,7 +20,6 @@ Extensions and imports:
import Data.Aeson import Data.Aeson
import Data.Proxy import Data.Proxy
import Data.Text import Data.Text
import Data.Semigroup
import GHC.Generics import GHC.Generics
import Network.Wai import Network.Wai
import Network.Wai.Handler.Warp import Network.Wai.Handler.Warp

View File

@ -28,8 +28,6 @@ executable cookbook-uverb
, swagger2 , swagger2
, wai , wai
, warp , warp
if impl(ghc < 8.6.1)
buildable: False
default-language: Haskell2010 default-language: Haskell2010
ghc-options: -Wall -pgmL markdown-unlit ghc-options: -Wall -pgmL markdown-unlit
build-tool-depends: markdown-unlit:markdown-unlit build-tool-depends: markdown-unlit:markdown-unlit

View File

@ -47,7 +47,6 @@ module Authentication where
import Data.Aeson (ToJSON) import Data.Aeson (ToJSON)
import Data.ByteString (ByteString) import Data.ByteString (ByteString)
import Data.Map (Map, fromList) import Data.Map (Map, fromList)
import Data.Monoid ((<>))
import qualified Data.Map as Map import qualified Data.Map as Map
import Data.Proxy (Proxy (Proxy)) import Data.Proxy (Proxy (Proxy))
import Data.Text (Text) import Data.Text (Text)

View File

@ -9,8 +9,6 @@ module Servant.Client.Core.BasicAuth (
import Data.ByteString.Base64 import Data.ByteString.Base64
(encode) (encode)
import Data.Monoid
((<>))
import Data.Text.Encoding import Data.Text.Encoding
(decodeUtf8) (decodeUtf8)
import Servant.API.BasicAuth import Servant.API.BasicAuth

View File

@ -35,8 +35,6 @@ import Data.Bitraversable
import qualified Data.ByteString as BS import qualified Data.ByteString as BS
import qualified Data.ByteString.Builder as Builder import qualified Data.ByteString.Builder as Builder
import qualified Data.ByteString.Lazy as LBS import qualified Data.ByteString.Lazy as LBS
import Data.Semigroup
((<>))
import qualified Data.Sequence as Seq import qualified Data.Sequence as Seq
import Data.Text import Data.Text
(Text) (Text)

View File

@ -53,8 +53,6 @@ import Data.Maybe
(maybe, maybeToList) (maybe, maybeToList)
import Data.Proxy import Data.Proxy
(Proxy (..)) (Proxy (..))
import Data.Semigroup
((<>))
import Data.Sequence import Data.Sequence
(fromList) (fromList)
import Data.String import Data.String

View File

@ -21,8 +21,6 @@ import Prelude ()
import Prelude.Compat import Prelude.Compat
import Data.Monoid () import Data.Monoid ()
import Data.Semigroup
((<>))
import qualified Network.HTTP.Types as HTTP import qualified Network.HTTP.Types as HTTP
import Test.Hspec import Test.Hspec

View File

@ -52,8 +52,6 @@ import Data.Ord
(comparing) (comparing)
import Data.Proxy import Data.Proxy
(Proxy (Proxy)) (Proxy (Proxy))
import Data.Semigroup
(Semigroup (..))
import Data.String.Conversions import Data.String.Conversions
(cs) (cs)
import Data.Text import Data.Text

View File

@ -13,7 +13,6 @@ module Servant.Foreign.Inflections
import Control.Lens hiding import Control.Lens hiding
(cons) (cons)
import qualified Data.Char as C import qualified Data.Char as C
import Data.Monoid
import Data.Text hiding import Data.Text hiding
(map) (map)
import Prelude hiding import Prelude hiding

View File

@ -23,8 +23,6 @@ import Control.Lens
import Data.Data import Data.Data
(Data) (Data)
import Data.Proxy import Data.Proxy
import Data.Semigroup
(Semigroup)
import Data.String import Data.String
import Data.Text import Data.Text
import Data.Text.Encoding import Data.Text.Encoding

View File

@ -11,8 +11,6 @@
module Servant.ForeignSpec where module Servant.ForeignSpec where
import Data.Monoid
((<>))
import Data.Proxy import Data.Proxy
import Servant.Foreign import Servant.Foreign
import Servant.Test.ComprehensiveAPI import Servant.Test.ComprehensiveAPI

View File

@ -49,8 +49,6 @@ import Data.Maybe
(maybeToList) (maybeToList)
import Data.Proxy import Data.Proxy
(Proxy (..)) (Proxy (..))
import Data.Semigroup
((<>))
import Data.Sequence import Data.Sequence
(fromList) (fromList)
import Data.String import Data.String

View File

@ -44,8 +44,6 @@ import Data.Maybe
(isJust) (isJust)
import Data.Monoid () import Data.Monoid ()
import Data.Proxy import Data.Proxy
import Data.Semigroup
((<>))
import GHC.Generics import GHC.Generics
(Generic) (Generic)
import qualified Network.HTTP.Types as HTTP import qualified Network.HTTP.Types as HTTP

View File

@ -46,8 +46,6 @@ import Data.Either
(partitionEithers) (partitionEithers)
import Data.Maybe import Data.Maybe
(fromMaybe, isNothing, mapMaybe, maybeToList) (fromMaybe, isNothing, mapMaybe, maybeToList)
import Data.Semigroup
((<>))
import Data.String import Data.String
(IsString (..)) (IsString (..))
import Data.String.Conversions import Data.String.Conversions

View File

@ -12,8 +12,6 @@ import Control.Monad.Trans
import qualified Data.ByteString as BS import qualified Data.ByteString as BS
import Data.ByteString.Base64 import Data.ByteString.Base64
(decodeLenient) (decodeLenient)
import Data.Monoid
((<>))
import Data.Typeable import Data.Typeable
(Typeable) (Typeable)
import Data.Word8 import Data.Word8

View File

@ -12,8 +12,6 @@ import Data.Aeson
(encode) (encode)
import qualified Data.ByteString.Char8 as BC import qualified Data.ByteString.Char8 as BC
import qualified Data.ByteString.Lazy.Char8 as BCL import qualified Data.ByteString.Lazy.Char8 as BCL
import Data.Monoid
((<>))
import Data.Proxy import Data.Proxy
import Data.String.Conversions import Data.String.Conversions
(cs) (cs)

View File

@ -16,8 +16,6 @@ import Data.Bifunctor
(Bifunctor (..)) (Bifunctor (..))
import Data.Bitraversable import Data.Bitraversable
(Bitraversable (..)) (Bitraversable (..))
import Data.Semigroup
(Semigroup (..))
import Data.Typeable import Data.Typeable
(Typeable) (Typeable)
import Prelude () import Prelude ()

View File

@ -47,8 +47,6 @@ import qualified Data.ByteString.Lazy as LBS
import qualified Data.ByteString.Lazy.Char8 as LBS8 import qualified Data.ByteString.Lazy.Char8 as LBS8
import Data.List.NonEmpty import Data.List.NonEmpty
(NonEmpty (..)) (NonEmpty (..))
import Data.Monoid
((<>))
import Data.Proxy import Data.Proxy
(Proxy) (Proxy)
import Data.Typeable import Data.Typeable

View File

@ -127,8 +127,6 @@ module Servant.Links (
import Data.List import Data.List
import Data.Proxy import Data.Proxy
(Proxy (..)) (Proxy (..))
import Data.Semigroup
((<>))
import Data.Singletons.Bool import Data.Singletons.Bool
(SBool (..), SBoolI (..)) (SBool (..), SBoolI (..))
import qualified Data.Text as Text import qualified Data.Text as Text