summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/roster-editor/src/Struct/Portrait.elm')
-rw-r--r-- | src/roster-editor/src/Struct/Portrait.elm | 68 |
1 files changed, 0 insertions, 68 deletions
diff --git a/src/roster-editor/src/Struct/Portrait.elm b/src/roster-editor/src/Struct/Portrait.elm deleted file mode 100644 index bcdf8ae..0000000 --- a/src/roster-editor/src/Struct/Portrait.elm +++ /dev/null @@ -1,68 +0,0 @@ -module Struct.Portrait exposing - ( - Type, - Ref, - default, - get_id, - get_name, - get_body_id, - get_icon_id, - decoder - ) - --- Elm ------------------------------------------------------------------------- -import Json.Decode -import Json.Decode.Pipeline - --- Roster Editor --------------------------------------------------------------- - --------------------------------------------------------------------------------- --- TYPES ----------------------------------------------------------------------- --------------------------------------------------------------------------------- -type alias Type = - { - id : String, - name : String, - body_id : String, - icon_id : String - } - -type alias Ref = String - --------------------------------------------------------------------------------- --- LOCAL ----------------------------------------------------------------------- --------------------------------------------------------------------------------- - --------------------------------------------------------------------------------- --- EXPORTED -------------------------------------------------------------------- --------------------------------------------------------------------------------- -default : Type -default = - { - id = "cat", - name = "Black Cat", - body_id = "mammal", - icon_id = "cat" - } - -get_id : Type -> String -get_id p = p.id - -get_name : Type -> String -get_name p = p.name - -get_body_id : Type -> String -get_body_id p = p.body_id - -get_icon_id : Type -> String -get_icon_id p = p.icon_id - -decoder : (Json.Decode.Decoder Type) -decoder = - (Json.Decode.succeed - Type - |> (Json.Decode.Pipeline.required "id" Json.Decode.string) - |> (Json.Decode.Pipeline.required "nam" Json.Decode.string) - |> (Json.Decode.Pipeline.required "bid" Json.Decode.string) - |> (Json.Decode.Pipeline.required "iid" Json.Decode.string) - ) |