:: IO_a_ -> _ IO_ThreadId package:happstack-server

Respond with 200 OK.

main = simpleHTTP nullConf $ ok "Everything is OK"

Respond with 204 No Content A 204 No Content response may not contain a message-body. If you try to supply one, it will be dutifully ignored.

main = simpleHTTP nullConf $ noContent "This will be ignored."

Respond with 500 Internal Server Error.

main = simpleHTTP nullConf $ internalServerError "Sorry, there was an internal server error."

Responds with 502 Bad Gateway.

main = simpleHTTP nullConf $ badGateway "Bad Gateway."

Respond with 400 Bad Request.

main = simpleHTTP nullConf $ badRequest "Bad Request."

Respond with 401 Unauthorized.

main = simpleHTTP nullConf $ unauthorized "You are not authorized."

Respond with 403 Forbidden.

main = simpleHTTP nullConf $ forbidden "Sorry, it is forbidden."

Respond with 404 Not Found.

main = simpleHTTP nullConf $ notFound "What you are looking for has not been found."

Respond with 413 Request Entity Too Large.

main = simpleHTTP nullConf $ requestEntityTooLarge "That's too big for me to handle."