62def38 · typeable/servant

servant-foreign/servant-foreign.cabal+1−1

@@ -1,5 +1,5 @@

1name: servant-foreign

2−version: 0.11.1

2+version: 0.11.2

3x-revision: 3

4synopsis: Helpers for generating clients for servant APIs in any programming language

5description:

servant-foreign/src/Servant/Foreign.hs+1

@@ -21,6 +21,7 @@ module Servant.Foreign

21 , reqMethod

22 , reqHeaders

23 , reqBody

24+ , reqBodyIsJSON

24 , reqReturnType

25 , reqReturnType

25 , reqFuncName

26 , reqFuncName

26 , path

27 , path

servant-foreign/src/Servant/Foreign/Internal.hs+2−1

@@ -130,13 +130,14 @@ data Req f = Req

130 , _reqBody :: Maybe f

131 , _reqReturnType :: Maybe f

132 , _reqFuncName :: FunctionName

133+ , _reqBodyIsJSON :: Bool

133 }

134 }

134 deriving (Data, Eq, Show, Typeable)

135 deriving (Data, Eq, Show, Typeable)

135

136

136makeLenses ''Req

137makeLenses ''Req

137

138

138defReq :: Req ftype

139defReq :: Req ftype

139−defReq = Req defUrl "GET" [] Nothing Nothing (FunctionName [])

140+defReq = Req defUrl "GET" [] Nothing Nothing (FunctionName []) True

140

141

141-- | 'HasForeignType' maps Haskell types with types in the target

142-- | 'HasForeignType' maps Haskell types with types in the target

142-- language of your backend. For example, let's say you're

143-- language of your backend. For example, let's say you're