onasty/web/src/Data/Error.elm(view raw)
1 2 3 4 5 6 7 8 9 10 11 12 13
module Data.Error exposing (Error, decode) import Json.Decode type alias Error = { message : String } decode : Json.Decode.Decoder Error decode = Json.Decode.map Error (Json.Decode.field "message" Json.Decode.string)