Renaming PaymentView to LoggedView

2 files changed, 8 insertions, 8 deletions

diff --git a/src/client/Model/View.elm b/src/client/Model/View.elm
index 7befca4..4c5fc6f 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.PaymentView exposing (..)
+import Model.View.LoggedView exposing (..)
 
 type View =
   LoadingView
   | SignInView SignInView
-  | PaymentView PaymentView
+  | LoggedView LoggedView
diff --git a/src/client/Model/View/PaymentView.elm b/src/client/Model/View/LoggedView.elm
index 93ab457..35fd9e5 100644
--- a/src/client/Model/View/PaymentView.elm
+++ b/src/client/Model/View/LoggedView.elm
@@ -1,6 +1,6 @@
-module Model.View.PaymentView
-  ( PaymentView
-  , initPaymentView
+module Model.View.LoggedView
+  ( LoggedView
+  , initLoggedView
   ) where
 
 import Model.User exposing (Users, UserId)
@@ -9,7 +9,7 @@ import Model.Payers exposing (Payers)
 import Model.View.Payment.Add exposing (..)
 import Model.View.Payment.Edition exposing (..)
 
-type alias PaymentView =
+type alias LoggedView =
   { users : Users
   , me : UserId
   , add : AddPayment
@@ -20,8 +20,8 @@ type alias PaymentView =
   , currentPage : Int
   }
 
-initPaymentView : Users -> UserId -> Payments -> Int -> Payers -> PaymentView
-initPaymentView users me payments paymentsCount payers =
+initLoggedView : Users -> UserId -> Payments -> Int -> Payers -> LoggedView
+initLoggedView users me payments paymentsCount payers =
   { users = users
   , me = me
   , add = initAddPayment