diff options
| author | Joris | 2016-03-30 14:17:59 +0200 |
|---|---|---|
| committer | Joris | 2016-03-30 14:17:59 +0200 |
| commit | c542551ad043260e6a4a6569b4af5c748f7b6001 (patch) | |
| tree | 1b305d3d5c7280e34d19ef04365b47200e1bae9f /src/client/elm/LoggedIn/Home/View/Table.elm | |
| parent | baefda5a902a94cedf84cfcd2ae550267e5d932e (diff) | |
| download | budget-c542551ad043260e6a4a6569b4af5c748f7b6001.tar.gz budget-c542551ad043260e6a4a6569b4af5c748f7b6001.tar.bz2 budget-c542551ad043260e6a4a6569b4af5c748f7b6001.zip | |
Filter own monthly payments in view
Diffstat (limited to 'src/client/elm/LoggedIn/Home/View/Table.elm')
| -rw-r--r-- | src/client/elm/LoggedIn/Home/View/Table.elm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/client/elm/LoggedIn/Home/View/Table.elm b/src/client/elm/LoggedIn/Home/View/Table.elm index c73b428..1d69fb9 100644 --- a/src/client/elm/LoggedIn/Home/View/Table.elm +++ b/src/client/elm/LoggedIn/Home/View/Table.elm @@ -20,7 +20,7 @@ import LoggedIn.Home.View.Date exposing (..) import LoggedIn.Home.View.Price exposing (price) import Model.User exposing (getUserName) -import Model.Payment exposing (..) +import Model.Payment as Payment exposing (..) import Action import Mailbox @@ -45,8 +45,7 @@ headerLine loggedData = paymentLines : LoggedData -> HomeModel.Model -> List Html paymentLines loggedData homeModel = - loggedData.payments - |> punctualPayments + Payment.punctual loggedData.payments |> List.sortBy (Date.toTime << .creation) |> List.reverse |> List.drop ((homeModel.currentPage - 1) * perPage) |