From b73ba24f3440b81698c9d5c370739d03f958f059 Mon Sep 17 00:00:00 2001
From: Joris
Date: Thu, 31 Dec 2015 19:34:29 +0100
Subject: Fetch all the payments, do the paging only in the UI

---
 src/client/elm/View/LoggedIn/Table.elm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/client/elm/View/LoggedIn/Table.elm')

diff --git a/src/client/elm/View/LoggedIn/Table.elm b/src/client/elm/View/LoggedIn/Table.elm
index f5a08b5..51a7b73 100644
--- a/src/client/elm/View/LoggedIn/Table.elm
+++ b/src/client/elm/View/LoggedIn/Table.elm
@@ -49,6 +49,8 @@ paymentLines model loggedInView =
   loggedInView.payments
     |> List.sortBy (Date.toTime << .creation)
     |> List.reverse
+    |> List.drop ((loggedInView.currentPage - 1) * perPage)
+    |> List.take perPage
     |> List.map (paymentLine model loggedInView)
 
 paymentLine : Model -> LoggedInView -> Payment -> Html
-- 
cgit v1.2.3