Allow client to load items in batches

This commit is contained in:
Eike Kettner
2020-06-04 21:14:49 +02:00
parent 062618bf86
commit e5b90eff34
6 changed files with 62 additions and 15 deletions

View File

@ -77,8 +77,11 @@ update key flags msg model =
doSearch : Flags -> Model -> ( Model, Cmd Msg )
doSearch flags model =
let
mask =
smask =
Comp.SearchMenu.getItemSearch model.searchMenuModel
mask =
{ smask | limit = 100 }
in
( { model | searchInProgress = True, viewMode = Listing }
, Api.itemSearch flags mask ItemSearchResp