diff options
Diffstat (limited to 'src/client/elm/Update.elm')
-rw-r--r-- | src/client/elm/Update.elm | 10 |
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) |