From f86032ff459f57c8cda368b48888a39c848d263b Mon Sep 17 00:00:00 2001 From: Nathanael Sensfelder Date: Sat, 1 Jan 2022 16:32:45 +0100 Subject: Adds JSON decoding. --- src/Struct/Event.elm | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src/Struct/Event.elm') diff --git a/src/Struct/Event.elm b/src/Struct/Event.elm index 4493b1a..77fb564 100644 --- a/src/Struct/Event.elm +++ b/src/Struct/Event.elm @@ -1,6 +1,10 @@ module Struct.Event exposing (..) -- Elm ------------------------------------------------------------------------- +import Http + +-- Tonkadur -------------------------------------------------------------------- +import Tonkadur.Types -- Local Module ---------------------------------------------------------------- @@ -10,6 +14,7 @@ module Struct.Event exposing (..) type Type = None | ChoiceSelected Int + | LoadStory (Result Http.Error Tonkadur.Types.State) -------------------------------------------------------------------------------- -- LOCAL ----------------------------------------------------------------------- -- cgit v1.2.3-70-g09d2