Renaming PaymentView to LoggedView

1 files changed, 6 insertions, 6 deletions

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