Renaming PaymentView to LoggedInView

5 files changed, 14 insertions, 14 deletions

diff --git a/src/client/Model/View.elm b/src/client/Model/View.elm
index 4c5fc6f..90c0e53 100644
--- a/src/client/Model/View.elm
+++ b/src/client/Model/View.elm
@@ -4,9 +4,9 @@ module Model.View
 
 import Model.Payment exposing (Payments)
 import Model.View.SignInView exposing (..)
-import Model.View.LoggedView exposing (..)
+import Model.View.LoggedInView exposing (..)
 
 type View =
   LoadingView
   | SignInView SignInView
-  | LoggedView LoggedView
+  | LoggedInView LoggedInView
diff --git a/src/client/Model/View/Payment/Add.elm b/src/client/Model/View/LoggedIn/Add.elm
index dc00e86..abd8a4d 100644
--- a/src/client/Model/View/Payment/Add.elm
+++ b/src/client/Model/View/LoggedIn/Add.elm
@@ -1,4 +1,4 @@
-module Model.View.Payment.Add
+module Model.View.LoggedIn.Add
   ( AddPayment
   , Frequency(..)
   , initAddPayment
diff --git a/src/client/Model/View/Payment/Edition.elm b/src/client/Model/View/LoggedIn/Edition.elm
index f58ce43..da6d7b0 100644
--- a/src/client/Model/View/Payment/Edition.elm
+++ b/src/client/Model/View/LoggedIn/Edition.elm
@@ -1,4 +1,4 @@
-module Model.View.Payment.Edition
+module Model.View.LoggedIn.Edition
   ( Edition
   ) where
 
diff --git a/src/client/Model/View/Payment/Monthly.elm b/src/client/Model/View/LoggedIn/Monthly.elm
index 15a5f2e..3c6f66a 100644
--- a/src/client/Model/View/Payment/Monthly.elm
+++ b/src/client/Model/View/LoggedIn/Monthly.elm
@@ -1,4 +1,4 @@
-module Model.View.Payment.Monthly
+module Model.View.LoggedIn.Monthly
   ( Monthly
   , initMonthly
   ) where
diff --git a/src/client/Model/View/LoggedView.elm b/src/client/Model/View/LoggedInView.elm
index 264fdf5..cf7f552 100644
--- a/src/client/Model/View/LoggedView.elm
+++ b/src/client/Model/View/LoggedInView.elm
@@ -1,16 +1,16 @@
-module Model.View.LoggedView
-  ( LoggedView
-  , initLoggedView
+module Model.View.LoggedInView
+  ( LoggedInView
+  , initLoggedInView
   ) where
 
 import Model.User exposing (Users, UserId)
 import Model.Payment exposing (Payments)
 import Model.Payers exposing (Payers)
-import Model.View.Payment.Add exposing (..)
-import Model.View.Payment.Edition exposing (..)
-import Model.View.Payment.Monthly exposing (..)
+import Model.View.LoggedIn.Add exposing (..)
+import Model.View.LoggedIn.Edition exposing (..)
+import Model.View.LoggedIn.Monthly exposing (..)
 
-type alias LoggedView =
+type alias LoggedInView =
   { users : Users
   , me : UserId
   , add : AddPayment
@@ -22,8 +22,8 @@ type alias LoggedView =
   , currentPage : Int
   }
 
-initLoggedView : Users -> UserId -> Payments -> Payments -> Int -> Payers -> LoggedView
-initLoggedView users me monthlyPayments payments paymentsCount payers =
+initLoggedInView : Users -> UserId -> Payments -> Payments -> Int -> Payers -> LoggedInView
+initLoggedInView users me monthlyPayments payments paymentsCount payers =
   { users = users
   , me = me
   , add = initAddPayment Punctual