From 071b07463ab3f6894928b13553e98cd47c9ccb18 Mon Sep 17 00:00:00 2001 From: Joris Date: Tue, 28 Jun 2016 00:32:37 +0200 Subject: Add tooltips --- src/client/elm/Init.elm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src/client/elm/Init.elm') diff --git a/src/client/elm/Init.elm b/src/client/elm/Init.elm index 8c148c0..9c6fc3b 100644 --- a/src/client/elm/Init.elm +++ b/src/client/elm/Init.elm @@ -10,18 +10,21 @@ import Json.Decode as Json exposing ((:=)) import Model.Translations exposing (..) import Model.Conf exposing (..) import Model.InitResult exposing (..) +import Model.Size exposing (..) type alias Init = { time : Time , translations : Translations , conf : Conf , result : InitResult + , windowSize : Size } decoder : Json.Decoder Init decoder = - Json.object4 Init + Json.object5 Init ("time" := Json.float) ("translations" := translationsDecoder) ("conf" := confDecoder) ("result" := initResultDecoder) + ("windowSize" := sizeDecoder) -- cgit v1.2.3