git.iko.soy/typeable/servant
on master help sign in
unsupporting GHC < 8.6.5, removing unecessary imports
6e5dffbakhesaCaro
doc/cookbook/curl-mock/CurlMock.lhs−1
@@ -24,7 +24,6 @@ Language extensions and imports:
24import Control.Lens ((^.))
24import Control.Lens ((^.))
25import Data.Aeson
25import Data.Aeson
26import Data.Aeson.Text
26import Data.Aeson.Text
27−import Data.Monoid ((<>))
28import Data.Proxy (Proxy (Proxy))
27import Data.Proxy (Proxy (Proxy))
29import Data.Text (Text)
28import Data.Text (Text)
30import Data.Text.Encoding (decodeUtf8)
29import Data.Text.Encoding (decodeUtf8)
doc/cookbook/custom-errors/CustomErrors.lhs−1
@@ -20,7 +20,6 @@ Extensions and imports:
20import Data.Aeson
20import Data.Aeson
21import Data.Proxy
21import Data.Proxy
22import Data.Text
22import Data.Text
23−import Data.Semigroup
24import GHC.Generics
23import GHC.Generics
25import Network.Wai
24import Network.Wai
26import Network.Wai.Handler.Warp
25import Network.Wai.Handler.Warp
doc/cookbook/uverb/uverb.cabal−2
@@ -28,8 +28,6 @@ executable cookbook-uverb
28 , swagger2
28 , swagger2
29 , wai
29 , wai
30 , warp
30 , warp
31− if impl(ghc < 8.6.1)
32− buildable: False
33 default-language: Haskell2010
31 default-language: Haskell2010
34 ghc-options: -Wall -pgmL markdown-unlit
32 ghc-options: -Wall -pgmL markdown-unlit
35 build-tool-depends: markdown-unlit:markdown-unlit
33 build-tool-depends: markdown-unlit:markdown-unlit
doc/tutorial/Authentication.lhs−1
@@ -47,7 +47,6 @@ module Authentication where
47import Data.Aeson (ToJSON)
47import Data.Aeson (ToJSON)
48import Data.ByteString (ByteString)
48import Data.ByteString (ByteString)
49import Data.Map (Map, fromList)
49import Data.Map (Map, fromList)
50−import Data.Monoid ((<>))
51import qualified Data.Map as Map
50import qualified Data.Map as Map
52import Data.Proxy (Proxy (Proxy))
51import Data.Proxy (Proxy (Proxy))
53import Data.Text (Text)
52import Data.Text (Text)
servant-client-core/src/Servant/Client/Core/BasicAuth.hs−2
@@ -9,8 +9,6 @@ module Servant.Client.Core.BasicAuth (
9
9
10import Data.ByteString.Base64
10import Data.ByteString.Base64
11 (encode)
11 (encode)
12−import Data.Monoid
13− ((<>))
14import Data.Text.Encoding
12import Data.Text.Encoding
15 (decodeUtf8)
13 (decodeUtf8)
16import Servant.API.BasicAuth
14import Servant.API.BasicAuth
servant-client-core/src/Servant/Client/Core/Request.hs−2
@@ -35,8 +35,6 @@ import Data.Bitraversable
35import qualified Data.ByteString as BS
35import qualified Data.ByteString as BS
36import qualified Data.ByteString.Builder as Builder
36import qualified Data.ByteString.Builder as Builder
37import qualified Data.ByteString.Lazy as LBS
37import qualified Data.ByteString.Lazy as LBS
38−import Data.Semigroup
39− ((<>))
40import qualified Data.Sequence as Seq
38import qualified Data.Sequence as Seq
41import Data.Text
39import Data.Text
42 (Text)
40 (Text)
servant-client/src/Servant/Client/Internal/HttpClient.hs−2
@@ -53,8 +53,6 @@ import Data.Maybe
53 (maybe, maybeToList)
53 (maybe, maybeToList)
54import Data.Proxy
54import Data.Proxy
55 (Proxy (..))
55 (Proxy (..))
56−import Data.Semigroup
57− ((<>))
58import Data.Sequence
56import Data.Sequence
59 (fromList)
57 (fromList)
60import Data.String
58import Data.String
servant-client/test/Servant/FailSpec.hs−2
@@ -21,8 +21,6 @@ import Prelude ()
21import Prelude.Compat
21import Prelude.Compat
22
22
23import Data.Monoid ()
23import Data.Monoid ()
24−import Data.Semigroup
25− ((<>))
26import qualified Network.HTTP.Types as HTTP
24import qualified Network.HTTP.Types as HTTP
27import Test.Hspec
25import Test.Hspec
28
26
servant-docs/src/Servant/Docs/Internal.hs−2
@@ -52,8 +52,6 @@ import Data.Ord
52 (comparing)
52 (comparing)
53import Data.Proxy
53import Data.Proxy
54 (Proxy (Proxy))
54 (Proxy (Proxy))
55−import Data.Semigroup
56− (Semigroup (..))
57import Data.String.Conversions
55import Data.String.Conversions
58 (cs)
56 (cs)
59import Data.Text
57import Data.Text
servant-foreign/src/Servant/Foreign/Inflections.hs−1
@@ -13,7 +13,6 @@ module Servant.Foreign.Inflections
13import Control.Lens hiding
13import Control.Lens hiding
14 (cons)
14 (cons)
15import qualified Data.Char as C
15import qualified Data.Char as C
16−import Data.Monoid
17import Data.Text hiding
16import Data.Text hiding
18 (map)
17 (map)
19import Prelude hiding
18import Prelude hiding
servant-foreign/src/Servant/Foreign/Internal.hs−2
@@ -23,8 +23,6 @@ import Control.Lens
23import Data.Data
23import Data.Data
24 (Data)
24 (Data)
25import Data.Proxy
25import Data.Proxy
26−import Data.Semigroup
27− (Semigroup)
28import Data.String
26import Data.String
29import Data.Text
27import Data.Text
30import Data.Text.Encoding
28import Data.Text.Encoding
servant-foreign/test/Servant/ForeignSpec.hs−2
@@ -11,8 +11,6 @@
11
11
12module Servant.ForeignSpec where
12module Servant.ForeignSpec where
13
13
14−import Data.Monoid
15− ((<>))
16import Data.Proxy
14import Data.Proxy
17import Servant.Foreign
15import Servant.Foreign
18import Servant.Test.ComprehensiveAPI
16import Servant.Test.ComprehensiveAPI
servant-http-streams/src/Servant/HttpStreams/Internal.hs−2
@@ -49,8 +49,6 @@ import Data.Maybe
49 (maybeToList)
49 (maybeToList)
50import Data.Proxy
50import Data.Proxy
51 (Proxy (..))
51 (Proxy (..))
52−import Data.Semigroup
53− ((<>))
54import Data.Sequence
52import Data.Sequence
55 (fromList)
53 (fromList)
56import Data.String
54import Data.String
servant-http-streams/test/Servant/ClientSpec.hs−2
@@ -44,8 +44,6 @@ import Data.Maybe
44 (isJust)
44 (isJust)
45import Data.Monoid ()
45import Data.Monoid ()
46import Data.Proxy
46import Data.Proxy
47−import Data.Semigroup
48− ((<>))
49import GHC.Generics
47import GHC.Generics
50 (Generic)
48 (Generic)
51import qualified Network.HTTP.Types as HTTP
49import qualified Network.HTTP.Types as HTTP
servant-server/src/Servant/Server/Internal.hs−2
@@ -46,8 +46,6 @@ import Data.Either
46 (partitionEithers)
46 (partitionEithers)
47import Data.Maybe
47import Data.Maybe
48 (fromMaybe, isNothing, mapMaybe, maybeToList)
48 (fromMaybe, isNothing, mapMaybe, maybeToList)
49−import Data.Semigroup
50− ((<>))
51import Data.String
49import Data.String
52 (IsString (..))
50 (IsString (..))
53import Data.String.Conversions
51import Data.String.Conversions
servant-server/src/Servant/Server/Internal/BasicAuth.hs−2
@@ -12,8 +12,6 @@ import Control.Monad.Trans
12import qualified Data.ByteString as BS
12import qualified Data.ByteString as BS
13import Data.ByteString.Base64
13import Data.ByteString.Base64
14 (decodeLenient)
14 (decodeLenient)
15−import Data.Monoid
16− ((<>))
17import Data.Typeable
15import Data.Typeable
18 (Typeable)
16 (Typeable)
19import Data.Word8
17import Data.Word8
servant-server/test/Servant/Server/ErrorSpec.hs−2
@@ -12,8 +12,6 @@ import Data.Aeson
12 (encode)
12 (encode)
13import qualified Data.ByteString.Char8 as BC
13import qualified Data.ByteString.Char8 as BC
14import qualified Data.ByteString.Lazy.Char8 as BCL
14import qualified Data.ByteString.Lazy.Char8 as BCL
15−import Data.Monoid
16− ((<>))
17import Data.Proxy
15import Data.Proxy
18import Data.String.Conversions
16import Data.String.Conversions
19 (cs)
17 (cs)
servant/src/Servant/API/Alternative.hs−2
@@ -16,8 +16,6 @@ import Data.Bifunctor
16 (Bifunctor (..))
16 (Bifunctor (..))
17import Data.Bitraversable
17import Data.Bitraversable
18 (Bitraversable (..))
18 (Bitraversable (..))
19−import Data.Semigroup
20− (Semigroup (..))
21import Data.Typeable
19import Data.Typeable
22 (Typeable)
20 (Typeable)
23import Prelude ()
21import Prelude ()
servant/src/Servant/API/Stream.hs−2
@@ -47,8 +47,6 @@ import qualified Data.ByteString.Lazy as LBS
47import qualified Data.ByteString.Lazy.Char8 as LBS8
47import qualified Data.ByteString.Lazy.Char8 as LBS8
48import Data.List.NonEmpty
48import Data.List.NonEmpty
49 (NonEmpty (..))
49 (NonEmpty (..))
50−import Data.Monoid
51− ((<>))
52import Data.Proxy
50import Data.Proxy
53 (Proxy)
51 (Proxy)
54import Data.Typeable
52import Data.Typeable
servant/src/Servant/Links.hs−2
@@ -127,8 +127,6 @@ module Servant.Links (
127import Data.List
127import Data.List
128import Data.Proxy
128import Data.Proxy
129 (Proxy (..))
129 (Proxy (..))
130−import Data.Semigroup
131− ((<>))
132import Data.Singletons.Bool
130import Data.Singletons.Bool
133 (SBool (..), SBoolI (..))
131 (SBool (..), SBoolI (..))
134import qualified Data.Text as Text
132import qualified Data.Text as Text