From 0d0c99fd28b782c7daf02fb5cc48d3eb252e705d Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 1 Jan 2016 14:39:40 +0100
Subject: Simplify persona usage

---
 src/client/elm/Update.elm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src/client/elm/Update.elm')

diff --git a/src/client/elm/Update.elm b/src/client/elm/Update.elm
index ed4b99d..62782a3 100644
--- a/src/client/elm/Update.elm
+++ b/src/client/elm/Update.elm
@@ -20,10 +20,11 @@ import Update.LoggedIn exposing (..)
 type Action =
   NoOp
   | UpdateTime Time
+  | GoLoadingView
   | GoSignInView
+  | GoLoggedInView Users UserId Payments Payments Int Payers
   | SignInError String
   | UpdateSignIn SignInAction
-  | GoLoggedInView Users UserId Payments Payments Int Payers
   | UpdateLoggedIn LoggedAction
 
 actions : Signal.Mailbox Action
@@ -36,6 +37,8 @@ updateModel action model =
       model
     UpdateTime time ->
       { model | currentTime = time }
+    GoLoadingView ->
+      { model | view = V.LoadingView }
     GoSignInView ->
       { model | view = V.SignInView initSignInView }
     GoLoggedInView users me monthlyPayments payments paymentsCount payers ->
-- 
cgit v1.2.3