Merge pull request #1162 from ethercrow/patch-1

Fix the example in Servant.Server
This commit is contained in:
Oleg Grenrus 2019-04-03 02:21:06 +03:00 committed by GitHub
commit 726380964a
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -110,7 +110,7 @@ import Servant.Server.Internal
-- Example:
--
-- > type MyApi = "books" :> Get '[JSON] [Book] -- GET /books
-- > :<|> "books" :> ReqBody Book :> Post '[JSON] Book -- POST /books
-- > :<|> "books" :> ReqBody '[JSON] Book :> Post '[JSON] Book -- POST /books
-- >
-- > server :: Server MyApi
-- > server = listAllBooks :<|> postBook