aboutsummaryrefslogtreecommitdiff
path: root/src/client/Main.elm
diff options
context:
space:
mode:
authorJoris Guyonvarch2015-08-11 21:32:10 +0200
committerJoris Guyonvarch2015-08-11 21:32:10 +0200
commit892a7dd19a92fc18767984e624b8a5026dce61e4 (patch)
tree7d59d58d96958e91a4e9114be0effb9ec7a082a8 /src/client/Main.elm
parenta3bab4f2a0cc8a6a95753dc91d8e862f40c80dcc (diff)
downloadbudget-892a7dd19a92fc18767984e624b8a5026dce61e4.tar.gz
budget-892a7dd19a92fc18767984e624b8a5026dce61e4.tar.bz2
budget-892a7dd19a92fc18767984e624b8a5026dce61e4.zip
Showing server sides generated messages from the client
Diffstat (limited to 'src/client/Main.elm')
-rw-r--r--src/client/Main.elm8
1 files changed, 7 insertions, 1 deletions
diff --git a/src/client/Main.elm b/src/client/Main.elm
index fd0cec7..226ae13 100644
--- a/src/client/Main.elm
+++ b/src/client/Main.elm
@@ -11,10 +11,12 @@ import Html exposing (Html)
import Http
import Task exposing (..)
import Time exposing (..)
+import Json.Decode as Json
import Model exposing (Model, initialModel)
import Model.Payment exposing (Payments, paymentsDecoder)
import Model.Message exposing (messageDecoder)
+import Model.Translations exposing (..)
import Update exposing (Action(..), actions, updateModel)
import Update.SignIn exposing (..)
@@ -29,7 +31,7 @@ main : Signal Html
main = Signal.map renderPage model
model : Signal Model
-model = Signal.foldp updateModel (initialModel initialTime) update
+model = Signal.foldp updateModel (initialModel initialTime translations) update
update : Signal Action
update = Signal.mergeMany
@@ -47,6 +49,10 @@ port initialTime : Time
---------------------------------------
+port translations : String
+
+---------------------------------------
+
port initView : Task Http.Error ()
port initView =
case signInError of