diff --git a/src/Airship/Resource.hs b/src/Airship/Resource.hs index 0d0e812..910fe9b 100644 --- a/src/Airship/Resource.hs +++ b/src/Airship/Resource.hs @@ -88,7 +88,7 @@ data Resource m = -- | When handling a @PUT@ request, returning @True@ here halts processing with @300 Multiple Choices@. Default: False. , multipleChoices :: Webmachine m Bool -- | As 'contentTypesAccepted', but checked and executed specifically in the case of a PATCH request. - , patchContentTypesAccepted :: Webmachine m[(MediaType, Webmachine m ())] + , patchContentTypesAccepted :: Webmachine m [(MediaType, Webmachine m ())] -- | When processing a request for which 'resourceExists' returned @False@, returning @True@ here -- allows the 'movedPermanently' and 'movedTemporarily' functions to process the request. , previouslyExisted :: Webmachine m Bool