diff options
author | Joris | 2016-06-25 23:08:35 +0200 |
---|---|---|
committer | Joris | 2016-06-25 23:08:35 +0200 |
commit | 5cb36652ccf07c9e0995ebc421a837ad7d258469 (patch) | |
tree | 085249bbf93e65a408c5ae2aa5a0816761cf9f2d /src/client | |
parent | 0886d5916ae28e2a0d1d5c70fb81842a6d0dc70f (diff) |
Show only non-null payment partition
Diffstat (limited to 'src/client')
-rw-r--r-- | src/client/elm/LoggedIn/Home/Header/View.elm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/client/elm/LoggedIn/Home/Header/View.elm b/src/client/elm/LoggedIn/Home/Header/View.elm index 67ff1f4..9468a04 100644 --- a/src/client/elm/LoggedIn/Home/Header/View.elm +++ b/src/client/elm/LoggedIn/Home/Header/View.elm @@ -83,6 +83,7 @@ paymentsPartition loggedData payments = ( loggedData.users |> Dict.toList |> List.map (Tuple.mapFst (\userId -> Payment.totalPayments (always True) userId payments)) + |> List.filter (\(sum, _) -> sum > 0) |> List.sortBy fst |> List.reverse |> List.map (\(sum, user) -> |