aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Model/View/LoggedInView.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/Model/View/LoggedInView.elm')
-rw-r--r--src/client/elm/Model/View/LoggedInView.elm36
1 files changed, 0 insertions, 36 deletions
diff --git a/src/client/elm/Model/View/LoggedInView.elm b/src/client/elm/Model/View/LoggedInView.elm
deleted file mode 100644
index e33c58b..0000000
--- a/src/client/elm/Model/View/LoggedInView.elm
+++ /dev/null
@@ -1,36 +0,0 @@
-module Model.View.LoggedInView
- ( LoggedInView
- , initLoggedInView
- ) where
-
-import Model.User exposing (Users, UserId)
-import Model.Payment exposing (Payments, PaymentFrequency(..))
-import Model.Payer exposing (Payers)
-import Model.Init exposing (..)
-import Model.View.LoggedIn.AddPayment exposing (..)
-import Model.View.LoggedIn.Edition exposing (..)
-import Model.View.LoggedIn.Monthly exposing (..)
-import Model.View.LoggedIn.Account exposing (..)
-
-type alias LoggedInView =
- { users : Users
- , add : AddPayment
- , monthly : Monthly
- , account : Account
- , payments : Payments
- , paymentsCount : Int
- , paymentEdition : Maybe Edition
- , currentPage : Int
- }
-
-initLoggedInView : Init -> LoggedInView
-initLoggedInView init =
- { users = init.users
- , add = initAddPayment Punctual
- , monthly = initMonthly init.monthlyPayments
- , account = initAccount init.me init.incomes
- , payments = init.payments
- , paymentsCount = init.paymentsCount
- , paymentEdition = Nothing
- , currentPage = 1
- }