Adding error feedbacks when adding a payment

1 files changed, 3 insertions, 4 deletions

diff --git a/src/client/Model/View/PaymentView.elm b/src/client/Model/View/PaymentView.elm
index 8de005d..07bd2ec 100644
--- a/src/client/Model/View/PaymentView.elm
+++ b/src/client/Model/View/PaymentView.elm
@@ -4,18 +4,17 @@ module Model.View.PaymentView
   ) where
 
 import Model.Payment exposing (Payments)
+import Model.View.Payment.Add exposing (..)
 
 type alias PaymentView =
   { userName : String
-  , name : String
-  , cost : String
+  , add : AddPayment
   , payments : Payments
   }
 
 initPaymentView : String -> Payments -> PaymentView
 initPaymentView userName payments =
   { userName = userName
-  , name = ""
-  , cost = ""
+  , add = initAddPayment
   , payments = payments
   }