@@ -862,6 +862,18 @@ instance {-# OVERLAPPABLE #-}
862862 status = fromInteger $ natVal (Proxy :: Proxy status)
863863 p = Proxy :: Proxy a
864864
865+instance (ReflectMethod method) =>
866+ HasDocs (NoContentVerb method) where
867+ docsFor Proxy (endpoint, action) DocOptions{..} =
868+ single endpoint' action'
869+
870+ where endpoint' = endpoint & method .~ method'
871+ action' = action & response.respStatus .~ 204
872+ & response.respTypes .~ []
873+ & response.respBody .~ []
874+ & response.respHeaders .~ []
875+ method' = reflectMethod (Proxy :: Proxy method)
876+
865877-- | TODO: mention the endpoint is streaming, its framing strategy
866878--
867879-- Also there are no samples.