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