From c876fd8c2f1aac2c3fe10c2b7de734f3ef71b71f Mon Sep 17 00:00:00 2001 From: Joris Date: Fri, 4 Sep 2015 23:13:48 +0200 Subject: Paging model works with both payments addition and deletion --- src/client/Model/Payment.elm | 4 ---- 1 file changed, 4 deletions(-) (limited to 'src/client/Model') diff --git a/src/client/Model/Payment.elm b/src/client/Model/Payment.elm index 02dcf7e..88063b4 100644 --- a/src/client/Model/Payment.elm +++ b/src/client/Model/Payment.elm @@ -5,7 +5,6 @@ module Model.Payment , PaymentId , PaymentWithId , paymentsDecoder - , addPayment , removePayment ) where @@ -50,8 +49,5 @@ paymentIdDecoder = Json.string dateDecoder : Json.Decoder Date dateDecoder = Json.customDecoder Json.string Date.fromString -addPayment : Payments -> (PaymentId, Payment) -> Payments -addPayment payments (paymentId, payment) = Dict.insert paymentId payment payments - removePayment : Payments -> PaymentId -> Payments removePayment payments paymentId = Dict.remove paymentId payments -- cgit v1.2.3