af00035 · typeable/servant

git.iko.soy/typeable/servant

module renaming: S.API.QQ -> S.Utils.ApiQuasiQuoting

commitaf00035b990ed7fe18c13ac97333edc07d53da71 authorSönke Hahn <soenke.hahn@zalora.com> dateFri 7 Nov 2014, 16:55 (12 years ago) parent2f9fb2b

5 files changed+6−6

compare with master

unifiedsplit

servant.cabal+1−1 src/Servant/API.hs+2−2 src/Servant/API/QQ.hs → src/Servant/Utils/ApiQuasiQuoting.hs+1−1 test/Servant/API/ElemSpec.hs+1−1 test/Servant/API/QQSpec.hs → test/Servant/Utils/ApiQuasiQuotingSpec.hs+1−1

servant.cabal+1−1

@@ -22,7 +22,6 @@ library

2222 Servant.API.Get

2323 Servant.API.Post

2424 Servant.API.Put

25− Servant.API.QQ

2625 Servant.API.QueryParam

2726 Servant.API.Raw

2827 Servant.API.ReqBody

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

3029 Servant.Client

3130 Servant.Docs

3231 Servant.Server

32+ Servant.Utils.ApiQuasiQuoting

3333 Servant.Utils.BaseUrl

3434 Servant.Utils.Req

3535 Servant.Utils.Text

src/Servant/API.hs+2−2

@@ -26,7 +26,7 @@ module Servant.API (

2626

2727 -- * Utilities

2828 -- | QuasiQuotes for endpoints

29− module Servant.API.QQ,

29+ module Servant.Utils.ApiQuasiQuoting,

3030 -- | Type-safe internal URLs

3131 module Servant.API.Elem,

3232 ) where

@@ -38,7 +38,7 @@ import Servant.API.Get

3838import Servant.API.Post

3939import Servant.API.Put

4040import Servant.API.QueryParam

41−import Servant.API.QQ (sitemap)

41+import Servant.Utils.ApiQuasiQuoting (sitemap)

4242import Servant.API.ReqBody

4343import Servant.API.Sub

4444import Servant.API.Alternative

src/Servant/API/QQ.hs → src/Servant/Utils/ApiQuasiQuoting.hsrenamed+1−1

@@ -4,7 +4,7 @@

44{-# LANGUAGE FlexibleInstances #-}

55{-# LANGUAGE ScopedTypeVariables #-}

66{-# LANGUAGE TemplateHaskell #-}

7−module Servant.API.QQ where

7+module Servant.Utils.ApiQuasiQuoting where

99import Control.Applicative

1010import Data.List.Split (splitOn)

test/Servant/API/ElemSpec.hs+1−1

@@ -7,7 +7,7 @@ import Test.Hspec

88import Servant.API

99import Servant.API.Elem (IsElem, IsLink)

10−import Servant.API.QQSpec ( (~>) )

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

1111

1212type TestApi =

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

test/Servant/API/QQSpec.hs → test/Servant/Utils/ApiQuasiQuotingSpec.hsrenamed+1−1

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

77{-# LANGUAGE TypeFamilies #-}

88{-# LANGUAGE TypeOperators #-}

99{-# LANGUAGE UndecidableInstances #-}

10−module Servant.API.QQSpec where

10+module Servant.Utils.ApiQuasiQuotingSpec where

1111

1212import Test.Hspec

1313