From 2a53fe50c62d4b7aec0f422998c743f68aa523c1 Mon Sep 17 00:00:00 2001 From: Joris Guyonvarch Date: Tue, 21 Jul 2015 23:25:58 +0200 Subject: Adding the payment without reloading the page --- src/client/Model/View/PaymentView.elm | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to 'src/client/Model/View/PaymentView.elm') diff --git a/src/client/Model/View/PaymentView.elm b/src/client/Model/View/PaymentView.elm index cea7d2e..8de005d 100644 --- a/src/client/Model/View/PaymentView.elm +++ b/src/client/Model/View/PaymentView.elm @@ -6,14 +6,16 @@ module Model.View.PaymentView import Model.Payment exposing (Payments) type alias PaymentView = - { name : String + { userName : String + , name : String , cost : String , payments : Payments } -initPaymentView : Payments -> PaymentView -initPaymentView payments = - { name = "" +initPaymentView : String -> Payments -> PaymentView +initPaymentView userName payments = + { userName = userName + , name = "" , cost = "" , payments = payments } -- cgit v1.2.3