Using incomes to compute a fair computation to designate the payer

1 files changed, 1 insertions, 3 deletions

diff --git a/src/client/Model/Payment.elm b/src/client/Model/Payment.elm
index 1f1c4ed..c4a8963 100644
--- a/src/client/Model/Payment.elm
+++ b/src/client/Model/Payment.elm
@@ -11,6 +11,7 @@ import Date exposing (..)
 import Json.Decode as Json exposing ((:=))
 
 import Model.User exposing (UserId, userIdDecoder)
+import Model.Date exposing (dateDecoder)
 
 perPage : Int
 perPage = 8
@@ -41,6 +42,3 @@ paymentDecoder =
 
 paymentIdDecoder : Json.Decoder PaymentId
 paymentIdDecoder = Json.int
-
-dateDecoder : Json.Decoder Date
-dateDecoder = Json.customDecoder Json.string Date.fromString