aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Update.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/Update.elm')
-rw-r--r--src/client/elm/Update.elm10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/client/elm/Update.elm b/src/client/elm/Update.elm
index 46c1b01..73dde9b 100644
--- a/src/client/elm/Update.elm
+++ b/src/client/elm/Update.elm
@@ -39,6 +39,11 @@ update action model =
|> Effects.task
)
+ GoLoggedInView users me monthlyPayments payments paymentsCount payers ->
+ ( { model | view = V.LoggedInView (initLoggedInView users me monthlyPayments payments paymentsCount payers) }
+ , Effects.none
+ )
+
ServerCommunication communication ->
( model
, sendRequest communication
@@ -52,11 +57,6 @@ update action model =
GoSignInView ->
({ model | view = V.SignInView initSignInView }, Effects.none)
- GoLoggedInView users me monthlyPayments payments paymentsCount payers ->
- ( { model | view = V.LoggedInView (initLoggedInView users me monthlyPayments payments paymentsCount payers) }
- , Effects.none
- )
-
UpdateSignIn signInAction ->
(applySignIn model signInAction, Effects.none)