github.com/simpleiot/simpleiot@v0.18.3/frontend/src/Api/Response.elm (about)

     1  module Api.Response exposing (Response, decoder)
     2  
     3  import Json.Decode as Decode
     4  import Json.Decode.Pipeline exposing (optional, required)
     5  
     6  
     7  type alias Response =
     8      { success : Bool
     9      , error : String
    10      , id : String
    11      }
    12  
    13  
    14  decoder : Decode.Decoder Response
    15  decoder =
    16      Decode.succeed Response
    17          |> required "success" Decode.bool
    18          |> optional "error" Decode.string ""
    19          |> optional "id" Decode.string ""