Modelize punctual and monthly payment pages

2 files changed, 6 insertions, 4 deletions

diff --git a/src/client/Dialog/AddPayment/Model.elm b/src/client/Dialog/AddPayment/Model.elm
index 11d59b1..8a94bc7 100644
--- a/src/client/Dialog/AddPayment/Model.elm
+++ b/src/client/Dialog/AddPayment/Model.elm
@@ -15,9 +15,11 @@ import Form.Field as Field exposing (Field)
 import Form.Validate as Validate exposing (Validation)
 import Validation
 
-import Model.Payment as Payment exposing (Payment, Frequency, PaymentId)
-import Model.Translations exposing (Translations)
 import Model.Category as Category exposing (Categories, CategoryId)
+import Model.Frequency as Frequency
+import Model.Payment as Payment exposing (Payment, PaymentId)
+import Model.Frequency exposing (Frequency)
+import Model.Translations exposing (Translations)
 
 import Utils.Maybe as Maybe
 
@@ -67,4 +69,4 @@ validation categories =
     (Validate.field "cost" Validation.cost)
     (Validate.field "date" Validation.date)
     (Validate.field "category" (Validation.category categories))
-    (Validate.field "frequency" Payment.validateFrequency)
+    (Validate.field "frequency" Frequency.validate)
diff --git a/src/client/Dialog/AddPayment/View.elm b/src/client/Dialog/AddPayment/View.elm
index 66c9f00..584adcd 100644
--- a/src/client/Dialog/AddPayment/View.elm
+++ b/src/client/Dialog/AddPayment/View.elm
@@ -26,7 +26,7 @@ import LoggedIn.Msg as LoggedInMsg
 import Msg exposing (Msg)
 
 import Model.Category exposing (Categories)
-import Model.Payment as Payment exposing (Frequency(..))
+import Model.Frequency exposing (Frequency(..))
 import Model.PaymentCategory exposing (PaymentCategories)
 import Model.Translations exposing (getMessage)
 import Model.View exposing (View(LoggedInView))