Dont output malformed error body

This commit is contained in:
Andrey Kuzmin 2017-12-24 15:24:19 +03:00
parent 6f8ccb031c
commit 1ccc7b1133

View File

@ -33,7 +33,7 @@ errorToString err =
BadStatus resp ->
parseError resp.body
|> Maybe.withDefault (resp.status.message ++ " " ++ resp.body)
|> Maybe.withDefault (toString resp.status.code ++ " " ++ resp.status.message)
BadPayload err resp ->
-- OK status, unexpected payload