Add PutCreated verb

This commit is contained in:
messis 2018-08-13 15:15:45 +02:00
parent f75bbf25be
commit 13b521eb90
2 changed files with 6 additions and 3 deletions

View file

@ -127,10 +127,10 @@ import Servant.API.Verbs
(Delete, DeleteAccepted, DeleteNoContent, (Delete, DeleteAccepted, DeleteNoContent,
DeleteNonAuthoritative, Get, GetAccepted, GetNoContent, DeleteNonAuthoritative, Get, GetAccepted, GetNoContent,
GetNonAuthoritative, GetPartialContent, GetResetContent, GetNonAuthoritative, GetPartialContent, GetResetContent,
Patch, PatchAccepted, PatchNoContent, PatchNonAuthoritative, Patch, PatchAccepted, PatchNoContent, PatchNonAuthoritative,C
Post, PostAccepted, PostCreated, PostNoContent, Post, PostAccepted, PostCreated, PostNoContent,
PostNonAuthoritative, PostResetContent, Put, PutAccepted, PostNonAuthoritative, PostResetContent, Put, PutAccepted,
PutNoContent, PutNonAuthoritative, PutCreated, PutNoContent, PutNonAuthoritative,
ReflectMethod (reflectMethod), StdMethod (..), Verb) ReflectMethod (reflectMethod), StdMethod (..), Verb)
import Servant.API.WithNamedContext import Servant.API.WithNamedContext
(WithNamedContext) (WithNamedContext)

View file

@ -56,14 +56,17 @@ type Patch = Verb 'PATCH 200
-- Indicates that a new resource has been created. The URI corresponding to the -- Indicates that a new resource has been created. The URI corresponding to the
-- resource should be given in the @Location@ header field. -- resource should be given in the @Location@ header field.
-- --
-- If the operation is idempotent, use 'PutCreated'. If not, use 'PostCreated'
--
-- If the resource cannot be created immediately, use 'PostAccepted'. -- If the resource cannot be created immediately, use 'PostAccepted'.
-- --
-- Consider using 'Servant.Links.safeLink' for the @Location@ header -- Consider using 'Servant.Links.safeLink' for the @Location@ header
-- field. -- field.
-- | 'POST' with 201 status code. -- | 'POST' with 201 status code.
--
type PostCreated = Verb 'POST 201 type PostCreated = Verb 'POST 201
-- | 'PUT' with 201 status code.
type PutCreated = Verb 'PUT 201
-- ** 202 Accepted -- ** 202 Accepted