diff options
Diffstat (limited to 'src/client/elm/InitViewAction.elm')
| -rw-r--r-- | src/client/elm/InitViewAction.elm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/client/elm/InitViewAction.elm b/src/client/elm/InitViewAction.elm index cdfc0fc..52ae08d 100644 --- a/src/client/elm/InitViewAction.elm +++ b/src/client/elm/InitViewAction.elm @@ -6,13 +6,13 @@ import Task exposing (..) import Http import Json.Decode as Json exposing ((:=)) -import Update exposing (Action(GoLoggedInView, GoSignInView)) +import Effects exposing (Never) +import Model.Action exposing (..) import Model.Payment exposing (Payments, paymentsDecoder) import Model.Payer exposing (Payers, payersDecoder) import Model.User exposing (Users, usersDecoder, UserId, userIdDecoder) -initViewAction : Task Http.Error Action initViewAction = Task.onError loggedInView (always <| Task.succeed GoSignInView) loggedInView : Task Http.Error Action |