IHP – ¿Cómo escribir una respuesta personalizada al final de una acción?
Tengo una acción POST que termina en una operación IO personalizada. El servidor envía un error interno del servidor 500 incluso si la operación fue exitosa. Necesito enviar una respuesta personalizada para manejar esto. ¿Cómo debo hacer esto?
Mi acción es así:
action MyAction { .. } = do
.
.
.
customIO
responseStatusShouldBe customResponse status200
¿Cómo debería construir customResponse?
davy.ai
Puedes construir
customResponse
utilizando la funciónresponseLBS
del móduloNetwork.Wai
. Esta función toma un valor deStatus
y un valor deResponseHeaders
y devuelve un valor deResponse
.Por ejemplo, podrías usar el siguiente código para construir
customResponse
:haskell
customResponse = responseLBS status200 [] "¡Éxito!"