rfc 0.0.0.9 → 0.0.0.10

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

rfc.cabal +1/−1
src/RFC/Servant.hs +2/−2

rfc.cabal view

@@ -1,5 +1,5 @@ name:                rfc-version:             0.0.0.9+version:             0.0.0.10 synopsis:            Robert Fischer's Common library description:         An enhanced Prelude and various utilities for Aeson, Servant, PSQL, and Redis that Robert Fischer uses. homepage:            https://github.com/RobertFischer/rfc#README.md

src/RFC/Servant.hs view

@@ -74,11 +74,11 @@ type FetchImpl a = UUID -> ApiCtx (IdAnd a) type FetchAPI a = Capture "id" UUID :> Get '[JSON] (IdAnd a) type CreateImpl a = a -> ApiCtx (IdAnd a)-type CreateAPI a = ReqBody '[JSON] a :> Post '[JSON] (IdAnd a)+type CreateAPI a = ReqBody '[JSON,FormUrlEncoded] a :> Post '[JSON] (IdAnd a) type PatchImpl a = UUID -> JSON.Patch -> ApiCtx (IdAnd a) -- type PatchAPI a = Capture "id" UUID :> ReqBody '[JSON] JSON.Patch :> Patch '[JSON] (IdAnd a) type ReplaceImpl a = UUID -> a -> ApiCtx (IdAnd a)-type ReplaceAPI a = Capture "id" UUID :> ReqBody '[JSON] a :> Post '[JSON] (IdAnd a)+type ReplaceAPI a = Capture "id" UUID :> ReqBody '[JSON,FormUrlEncoded] a :> Post '[JSON] (IdAnd a)  type ServerImpl a =   (FetchAllImpl a)