blob: 7f0c66b9d51879d9842f73060a66839803c56732 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
module View.Payments
( renderPayments
) where
import Html exposing (..)
import Html.Attributes exposing (..)
import Model.Payment exposing (Payments)
import Model.View.PaymentView exposing (PaymentView)
import View.Payments.Add exposing (addPayment)
import View.Payments.Table exposing (paymentsTable)
renderPayments : PaymentView -> Html
renderPayments paymentView =
div
[ class "payments" ]
[ addPayment paymentView.add
, paymentsTable paymentView.payments
]
|
