From baefda5a902a94cedf84cfcd2ae550267e5d932e Mon Sep 17 00:00:00 2001
From: Joris
Date: Wed, 30 Mar 2016 00:28:55 +0200
Subject: Merge punctual and monthly payments in client model

---
 src/client/elm/LoggedIn/Home/AddPayment/Action.elm | 4 ++--
 src/client/elm/LoggedIn/Home/AddPayment/Model.elm  | 6 +++---
 src/client/elm/LoggedIn/Home/AddPayment/Update.elm | 2 +-
 src/client/elm/LoggedIn/Home/AddPayment/View.elm   | 2 +-
 4 files changed, 7 insertions(+), 7 deletions(-)

(limited to 'src/client/elm/LoggedIn/Home/AddPayment')

diff --git a/src/client/elm/LoggedIn/Home/AddPayment/Action.elm b/src/client/elm/LoggedIn/Home/AddPayment/Action.elm
index 81c32e2..a692b15 100644
--- a/src/client/elm/LoggedIn/Home/AddPayment/Action.elm
+++ b/src/client/elm/LoggedIn/Home/AddPayment/Action.elm
@@ -2,11 +2,11 @@ module LoggedIn.Home.AddPayment.Action
   ( Action(..)
   ) where
 
-import Model.Payment exposing (PaymentFrequency)
+import Model.Payment exposing (Frequency)
 
 type Action =
   NoOp
-  | Init PaymentFrequency
+  | Init Frequency
   | UpdateName String
   | UpdateCost String
   | AddError (Maybe String) (Maybe String)
diff --git a/src/client/elm/LoggedIn/Home/AddPayment/Model.elm b/src/client/elm/LoggedIn/Home/AddPayment/Model.elm
index 22b6883..19933fd 100644
--- a/src/client/elm/LoggedIn/Home/AddPayment/Model.elm
+++ b/src/client/elm/LoggedIn/Home/AddPayment/Model.elm
@@ -7,18 +7,18 @@ import Result as Result exposing (Result(..))
 import Json.Decode exposing ((:=))
 
 import Model.Translations exposing (..)
-import Model.Payment exposing (PaymentFrequency(..))
+import Model.Payment exposing (Frequency(..))
 
 type alias Model =
   { name : String
   , nameError : Maybe String
   , cost : String
   , costError : Maybe String
-  , frequency : PaymentFrequency
+  , frequency : Frequency
   , waitingServer : Bool
   }
 
-init : PaymentFrequency -> Model
+init : Frequency -> Model
 init frequency =
   { name = ""
   , nameError = Nothing
diff --git a/src/client/elm/LoggedIn/Home/AddPayment/Update.elm b/src/client/elm/LoggedIn/Home/AddPayment/Update.elm
index 473e998..7f5fb0a 100644
--- a/src/client/elm/LoggedIn/Home/AddPayment/Update.elm
+++ b/src/client/elm/LoggedIn/Home/AddPayment/Update.elm
@@ -10,7 +10,7 @@ import LoggedIn.Home.AddPayment.Action as AddPaymentAction
 import LoggedIn.Home.AddPayment.Model as AddPaymentModel
 
 import Model.Translations exposing (Translations, getMessage)
-import Model.Payment exposing (PaymentFrequency(..))
+import Model.Payment exposing (Frequency(..))
 
 update : AddPaymentAction.Action -> AddPaymentModel.Model -> AddPaymentModel.Model
 update action addPayment =
diff --git a/src/client/elm/LoggedIn/Home/AddPayment/View.elm b/src/client/elm/LoggedIn/Home/AddPayment/View.elm
index 47dd6e8..562f69b 100644
--- a/src/client/elm/LoggedIn/Home/AddPayment/View.elm
+++ b/src/client/elm/LoggedIn/Home/AddPayment/View.elm
@@ -16,7 +16,7 @@ import LoggedIn.Home.Model as HomeModel
 import LoggedIn.Home.AddPayment.Action as AddPaymentAction
 import LoggedIn.Home.AddPayment.Model as AddPaymentModel
 
-import Model.Payment exposing (PaymentFrequency(..))
+import Model.Payment exposing (Frequency(..))
 import Model.Translations exposing (getMessage)
 import LoggedData exposing (LoggedData)
 
-- 
cgit v1.2.3