aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Main.elm
diff options
context:
space:
mode:
authorJoris2016-01-04 00:34:48 +0100
committerJoris2016-01-04 00:40:25 +0100
commit6b090b3bdef7108d51d93207e28b148c121767aa (patch)
treef0815d638723b62b5f16cf9d94ce5783751fc3db /src/client/elm/Main.elm
parentd9df5c3fcffe12aac239b58ccf2fd82c19c3be62 (diff)
downloadbudget-6b090b3bdef7108d51d93207e28b148c121767aa.tar.gz
budget-6b090b3bdef7108d51d93207e28b148c121767aa.tar.bz2
budget-6b090b3bdef7108d51d93207e28b148c121767aa.zip
Simplify server communicaitons in client
Diffstat (limited to 'src/client/elm/Main.elm')
-rw-r--r--src/client/elm/Main.elm5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/client/elm/Main.elm b/src/client/elm/Main.elm
index e8bbd54..7d13376 100644
--- a/src/client/elm/Main.elm
+++ b/src/client/elm/Main.elm
@@ -29,7 +29,10 @@ app : App Model
app = StartApp.start
{ init =
( initialModel initialTime translations config
- , Effects.task Server.initViewAction
+ , Server.init
+ |> Task.map GoLoggedInView
+ |> flip Task.onError (always <| Task.succeed GoSignInView)
+ |> Effects.task
)
, view = view
, update = update