diff options
author | Joris | 2015-09-06 16:46:59 +0200 |
---|---|---|
committer | Joris | 2015-09-06 16:46:59 +0200 |
commit | 3853811450d4fe801da996eb48825049c3541030 (patch) | |
tree | b483c6152f55b6fe87d23108d2d0346a593e51ac /src/client/Model/View/LoggedView.elm | |
parent | 0b6f0fa29075178b45cb17d2932003ab4b342280 (diff) | |
download | budget-3853811450d4fe801da996eb48825049c3541030.tar.gz budget-3853811450d4fe801da996eb48825049c3541030.tar.bz2 budget-3853811450d4fe801da996eb48825049c3541030.zip |
Renaming PaymentView to LoggedInView
Diffstat (limited to 'src/client/Model/View/LoggedView.elm')
-rw-r--r-- | src/client/Model/View/LoggedView.elm | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/src/client/Model/View/LoggedView.elm b/src/client/Model/View/LoggedView.elm deleted file mode 100644 index 264fdf5..0000000 --- a/src/client/Model/View/LoggedView.elm +++ /dev/null @@ -1,36 +0,0 @@ -module Model.View.LoggedView - ( LoggedView - , initLoggedView - ) where - -import Model.User exposing (Users, UserId) -import Model.Payment exposing (Payments) -import Model.Payers exposing (Payers) -import Model.View.Payment.Add exposing (..) -import Model.View.Payment.Edition exposing (..) -import Model.View.Payment.Monthly exposing (..) - -type alias LoggedView = - { users : Users - , me : UserId - , add : AddPayment - , monthly : Monthly - , payments : Payments - , paymentsCount : Int - , payers : Payers - , paymentEdition : Maybe Edition - , currentPage : Int - } - -initLoggedView : Users -> UserId -> Payments -> Payments -> Int -> Payers -> LoggedView -initLoggedView users me monthlyPayments payments paymentsCount payers = - { users = users - , me = me - , add = initAddPayment Punctual - , monthly = initMonthly monthlyPayments - , payments = payments - , paymentsCount = paymentsCount - , payers = payers - , paymentEdition = Nothing - , currentPage = 1 - } |