| summaryrefslogtreecommitdiff |
diff options
| author | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2022-01-01 16:32:45 +0100 |
|---|---|---|
| committer | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2022-01-01 16:32:45 +0100 |
| commit | f86032ff459f57c8cda368b48888a39c848d263b (patch) | |
| tree | 682ee08cf60baebfc62b3c7cdaf4e715e1bbc635 /src/ElmModule/Init.elm | |
| parent | 17903cc8333e0f50d3b4e3567f52a8de92101ad3 (diff) | |
Adds JSON decoding.
Diffstat (limited to 'src/ElmModule/Init.elm')
| -rw-r--r-- | src/ElmModule/Init.elm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/ElmModule/Init.elm b/src/ElmModule/Init.elm index 885153a..08c2540 100644 --- a/src/ElmModule/Init.elm +++ b/src/ElmModule/Init.elm @@ -5,6 +5,8 @@ import Struct.Flags import Struct.Event import Struct.Model +import Comm.LoadStory + -------------------------------------------------------------------------------- -- LOCAL ----------------------------------------------------------------------- -------------------------------------------------------------------------------- @@ -15,4 +17,4 @@ import Struct.Model init : Struct.Flags.Type -> (Struct.Model.Type, (Cmd Struct.Event.Type)) init flags = -- TODO: read flags and request story. - ((Struct.Model.new), Cmd.none) + ((Struct.Model.new), (Comm.LoadStory.request "/story/0.json")) |