1cd3503 · servant · git.iko.soy

servant.cabal+1−1

compare with master

unifiedsplit

@@ -18,7 +18,6 @@ library

18 Servant.API.Alternative

19 Servant.API.Capture

20 Servant.API.Delete

21− Servant.API.Elem

22 Servant.API.Get

21 Servant.API.Get

23 Servant.API.Post

22 Servant.API.Post

24 Servant.API.Put

23 Servant.API.Put

@@ -31,6 +30,7 @@ library

31 Servant.Server

30 Servant.Server

32 Servant.Utils.ApiQuasiQuoting

31 Servant.Utils.ApiQuasiQuoting

33 Servant.Utils.BaseUrl

32 Servant.Utils.BaseUrl

33+ Servant.Utils.Links

34 Servant.Utils.Req

35 Servant.Utils.Text

36 build-depends:

src/Servant/API.hs+4−4

@@ -28,17 +28,17 @@ module Servant.API (

28 -- | QuasiQuotes for endpoints

29 module Servant.Utils.ApiQuasiQuoting,

30 -- | Type-safe internal URLs

31− module Servant.API.Elem,

31+ module Servant.Utils.Links,

32 ) where

33

34+import Servant.API.Alternative

34import Servant.API.Capture

35import Servant.API.Capture

35import Servant.API.Delete

36import Servant.API.Delete

36−import Servant.API.Elem (mkLink)

37import Servant.API.Get

38import Servant.API.Post

39import Servant.API.Put

40import Servant.API.QueryParam

41−import Servant.Utils.ApiQuasiQuoting (sitemap)

42import Servant.API.ReqBody

41import Servant.API.ReqBody

43import Servant.API.Sub

42import Servant.API.Sub

44−import Servant.API.Alternative

43+import Servant.Utils.ApiQuasiQuoting (sitemap)

44+import Servant.Utils.Links (mkLink)

src/Servant/API/Elem.hs → src/Servant/Utils/Links.hsrenamed+1−1

@@ -6,7 +6,7 @@

6{-# LANGUAGE FunctionalDependencies #-}

7{-# LANGUAGE ScopedTypeVariables #-}

8{-# LANGUAGE UndecidableInstances #-}

9−module Servant.API.Elem where

9+module Servant.Utils.Links where

10

11import Data.Proxy

12import GHC.TypeLits

test/Servant/API/ElemSpec.hs → test/Servant/Utils/LinksSpec.hsrenamed+2−2

@@ -1,13 +1,13 @@

1{-# LANGUAGE DataKinds #-}

2{-# LANGUAGE PolyKinds #-}

3{-# LANGUAGE TypeOperators #-}

4−module Servant.API.ElemSpec where

4+module Servant.Utils.LinksSpec where

5

6import Test.Hspec

7

8import Servant.API

9−import Servant.API.Elem (IsElem, IsLink)

10import Servant.Utils.ApiQuasiQuotingSpec ( (~>) )

9import Servant.Utils.ApiQuasiQuotingSpec ( (~>) )

10+import Servant.Utils.Links (IsElem, IsLink)

11

12type TestApi =

13 "hello" :> Capture "name" String :> QueryParam "capital" Bool :> Get Bool