module Comm.Okay exposing (decoder) -- Elm ------------------------------------------------------------------------- import Json.Decode -- Battlemap ------------------------------------------------------------------- import Struct.ServerReply -------------------------------------------------------------------------------- -- TYPES ----------------------------------------------------------------------- -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- -- LOCAL ----------------------------------------------------------------------- -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- -- EXPORTED -------------------------------------------------------------------- -------------------------------------------------------------------------------- decoder : (Json.Decode.Decoder Struct.ServerReply.Type) decoder = (Json.Decode.succeed Struct.ServerReply.Okay)