| summaryrefslogtreecommitdiff |
diff options
| author | nsensfel <SpamShield0@noot-noot.org> | 2018-09-14 18:57:42 +0200 |
|---|---|---|
| committer | nsensfel <SpamShield0@noot-noot.org> | 2018-09-14 18:57:42 +0200 |
| commit | 2aa0c12b6a193d16681a0179a067664390af7aee (patch) | |
| tree | ca2e2533c3a9947ba5ef9d5e1d646b964ba82eb6 /src/Comm/GetBattles.elm | |
| parent | ac5b50e4a622ee0885678a96c69af7f49290bcee (diff) | |
...
Diffstat (limited to 'src/Comm/GetBattles.elm')
| -rw-r--r-- | src/Comm/GetBattles.elm | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/src/Comm/GetBattles.elm b/src/Comm/GetBattles.elm index 59b8d1d..0956972 100644 --- a/src/Comm/GetBattles.elm +++ b/src/Comm/GetBattles.elm @@ -5,8 +5,10 @@ import Json.Encode -- Extension ------------------------------------------------------------------- import Comm.Send + import Struct.Event import Struct.Model +import Struct.Player -------------------------------------------------------------------------------- -- TYPES ------------------------------------------------------------------------ @@ -31,11 +33,13 @@ try_encoding player_id model = -------------------------------------------------------------------------------- -- EXPORTED -------------------------------------------------------------------- -------------------------------------------------------------------------------- -try : Struct.Model.Type -> String -> (Maybe (Cmd Struct.Event.Type)) -try model player_id = +try : Struct.Model.Type -> Struct.Player.Type -> (Maybe (Cmd Struct.Event.Type)) +try model player = (Comm.Send.try_sending model - -- FIXME: this is a param now... - Constants.IO.get_battles_handler - (try_encoding player_id) + ( + (Struct.Player.get_query_url player) + ++ "/handler/player/plr_get_battles" + ) + (try_encoding (Struct.Player.get_id player)) ) |


