aboutsummaryrefslogtreecommitdiff
path: root/src/client/View/LoggedIn.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/View/LoggedIn.elm')
-rw-r--r--src/client/View/LoggedIn.elm27
1 files changed, 27 insertions, 0 deletions
diff --git a/src/client/View/LoggedIn.elm b/src/client/View/LoggedIn.elm
new file mode 100644
index 0000000..57a8eb0
--- /dev/null
+++ b/src/client/View/LoggedIn.elm
@@ -0,0 +1,27 @@
+module View.LoggedIn
+ ( renderLoggedIn
+ ) where
+
+import Html exposing (..)
+import Html.Attributes exposing (..)
+
+import Model exposing (Model)
+import Model.Payment exposing (Payments)
+import Model.View.LoggedInView exposing (LoggedInView)
+
+import View.LoggedIn.ExceedingPayer exposing (exceedingPayers)
+import View.LoggedIn.Add exposing (addPayment)
+import View.LoggedIn.Monthly exposing (monthlyPayments)
+import View.LoggedIn.Table exposing (paymentsTable)
+import View.LoggedIn.Paging exposing (paymentsPaging)
+
+renderLoggedIn : Model -> LoggedInView -> Html
+renderLoggedIn model loggedInView =
+ div
+ [ class "payments" ]
+ [ exceedingPayers model loggedInView
+ , addPayment model loggedInView
+ , monthlyPayments model loggedInView
+ , paymentsTable model loggedInView
+ , paymentsPaging loggedInView
+ ]