aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoris2016-06-25 23:08:35 +0200
committerJoris2016-06-25 23:08:35 +0200
commit5cb36652ccf07c9e0995ebc421a837ad7d258469 (patch)
tree085249bbf93e65a408c5ae2aa5a0816761cf9f2d
parent0886d5916ae28e2a0d1d5c70fb81842a6d0dc70f (diff)
downloadbudget-5cb36652ccf07c9e0995ebc421a837ad7d258469.tar.gz
budget-5cb36652ccf07c9e0995ebc421a837ad7d258469.tar.bz2
budget-5cb36652ccf07c9e0995ebc421a837ad7d258469.zip
Show only non-null payment partition
-rw-r--r--src/client/elm/LoggedIn/Home/Header/View.elm1
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) ->