diff options
| author | Joris Guyonvarch | 2015-08-14 08:28:20 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-08-14 08:28:20 +0200 |
| commit | e98879d01b3b427a161d70535a30b2f848400607 (patch) | |
| tree | 91d8f7c2ebdb02640d99f50e56e282835fff523a /src | |
| parent | c23ec2aed46b3e766cffbf3662fe529426ad1b84 (diff) | |
| download | budget-e98879d01b3b427a161d70535a30b2f848400607.tar.gz budget-e98879d01b3b427a161d70535a30b2f848400607.tar.bz2 budget-e98879d01b3b427a161d70535a30b2f848400607.zip | |
Adding an edition model for the payment view
Diffstat (limited to 'src')
| -rw-r--r-- | src/client/Model/View/Payment/Edition.elm | 5 | ||||
| -rw-r--r-- | src/client/Model/View/PaymentView.elm | 3 |
2 files changed, 8 insertions, 0 deletions
diff --git a/src/client/Model/View/Payment/Edition.elm b/src/client/Model/View/Payment/Edition.elm new file mode 100644 index 0000000..a650fa8 --- /dev/null +++ b/src/client/Model/View/Payment/Edition.elm @@ -0,0 +1,5 @@ +module Model.View.Payment.Edition + ( Edition + ) where + +type alias Edition = String diff --git a/src/client/Model/View/PaymentView.elm b/src/client/Model/View/PaymentView.elm index 07bd2ec..2f2be46 100644 --- a/src/client/Model/View/PaymentView.elm +++ b/src/client/Model/View/PaymentView.elm @@ -5,11 +5,13 @@ module Model.View.PaymentView import Model.Payment exposing (Payments) import Model.View.Payment.Add exposing (..) +import Model.View.Payment.Edition exposing (..) type alias PaymentView = { userName : String , add : AddPayment , payments : Payments + , edition : Maybe Edition } initPaymentView : String -> Payments -> PaymentView @@ -17,4 +19,5 @@ initPaymentView userName payments = { userName = userName , add = initAddPayment , payments = payments + , edition = Nothing } |