diff options
| author | Joris | 2015-09-04 09:52:20 +0200 |
|---|---|---|
| committer | Joris | 2015-09-04 09:52:20 +0200 |
| commit | c1f44a5890fbb26faf6f17c676662ea1bd495f2e (patch) | |
| tree | f158bdef5bd985a9b11d46d12878d566268cf6cc /src/client/Main.elm | |
| parent | 889df8caf04de5f10a9e623bab3e502e9573159d (diff) | |
| download | budget-c1f44a5890fbb26faf6f17c676662ea1bd495f2e.tar.gz budget-c1f44a5890fbb26faf6f17c676662ea1bd495f2e.tar.bz2 budget-c1f44a5890fbb26faf6f17c676662ea1bd495f2e.zip | |
Adding paging (need some fixes)
Diffstat (limited to 'src/client/Main.elm')
| -rw-r--r-- | src/client/Main.elm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/client/Main.elm b/src/client/Main.elm index 6ca2743..685d3b2 100644 --- a/src/client/Main.elm +++ b/src/client/Main.elm @@ -12,7 +12,7 @@ import Time exposing (..) import Json.Decode as Json exposing ((:=)) import Model exposing (Model, initialModel) -import Model.Payment exposing (Payments, paymentsDecoder) +import Model.Payment exposing (Payments, paymentsDecoder, perPage) import Model.Payers exposing (Payers, payersDecoder) import Model.Message exposing (messageDecoder) import Model.Translations exposing (..) @@ -64,7 +64,7 @@ getUserName : Task Http.Error String getUserName = Http.get messageDecoder "/userName" getPayments : Task Http.Error Payments -getPayments = Http.get paymentsDecoder "/payments" +getPayments = Http.get paymentsDecoder ("/payments?page=1&perPage=" ++ toString perPage) getPaymentsCount : Task Http.Error Int getPaymentsCount = Http.get ("number" := Json.int) "/payments/count" |