onse
--
-- > serve 80 [ emptyPath >> contentType "text/html" >> okay "Some response"
-- >          , contentType "text/html" >> notFound "<h3>404 Not Found</h3>"
-- >          ]
notFound ∷ HPutable a
         ⇒ a -- ^ Response body
         → Route Response
notFound = return ∘ Response 404
{-# INLINE notFound #-}

-- | Ret
notFound ∷ HPutable a
         ⇒ a -- ^ Response body
         → Route Response
notFound = return ∘ Response 404
notFound = return ∘ Response 404