diff options
| -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) -> |